GNU bug report logs - #32780
Minimal fix for guile.el

Message received at submit <at> debbugs.gnu.org:

Received: (at submit) by debbugs.gnu.org; 20 Sep 2018 09:21:57 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Thu Sep 20 05:21:57 2018
Received: from localhost ([127.0.0.1]:46329 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1g2v9p-000445-Lj
	for submit <at> debbugs.gnu.org; Thu, 20 Sep 2018 05:21:57 -0400
Received: from eggs.gnu.org ([208.118.235.92]:44974)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <frankruben27@HIDDEN>) id 1g2v9o-00043s-B3
 for submit <at> debbugs.gnu.org; Thu, 20 Sep 2018 05:21:56 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <frankruben27@HIDDEN>) id 1g2v9i-0007j7-7k
 for submit <at> debbugs.gnu.org; Thu, 20 Sep 2018 05:21:51 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=-0.2 required=5.0 tests=BAYES_05,
 FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,HTML_MESSAGE,T_DKIM_INVALID
 autolearn=disabled version=3.3.2
Received: from lists.gnu.org ([2001:4830:134:3::11]:54410)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32)
 (Exim 4.71) (envelope-from <frankruben27@HIDDEN>)
 id 1g2v9i-0007iy-3w
 for submit <at> debbugs.gnu.org; Thu, 20 Sep 2018 05:21:50 -0400
Received: from eggs.gnu.org ([2001:4830:134:3::10]:37708)
 by lists.gnu.org with esmtp (Exim 4.71)
 (envelope-from <frankruben27@HIDDEN>) id 1g2v9h-0001mN-60
 for bug-guile@HIDDEN; Thu, 20 Sep 2018 05:21:49 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <frankruben27@HIDDEN>) id 1g2v9g-0007hd-9p
 for bug-guile@HIDDEN; Thu, 20 Sep 2018 05:21:49 -0400
Received: from mail-vs1-xe2b.google.com ([2607:f8b0:4864:20::e2b]:44802)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <frankruben27@HIDDEN>)
 id 1g2v9g-0007hN-57
 for bug-guile@HIDDEN; Thu, 20 Sep 2018 05:21:48 -0400
Received: by mail-vs1-xe2b.google.com with SMTP id v18-v6so2729681vsl.11
 for <bug-guile@HIDDEN>; Thu, 20 Sep 2018 02:21:47 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=mime-version:from:date:message-id:subject:to;
 bh=OpwXm8g1opYzlyZ/bw2hXz5aBDpGBd2PnW1yFMDnUeY=;
 b=vOlx9dCAKDf9UEF/7bY0CyK0eoytBfTD9mu0dIn+dDsLMV89jpLaPtWeIfjw2In2db
 Flnoiatij6L3MzRR3x2Qipp2f4j3a0hIRMRU6sMk/joLHuZkBVGSkNz96mgStbCVkCZ7
 ISpCi7X8ujDU1YkzLJZB3lQ8c1/Ex5WYb0jfSRQC3xONvKcAymhLAyAtGQpR4zGQfloB
 ghCnJtVvt2irB9DM4SXNp6q9RNvteBWXY8spPHlKrTUKRZndlkI7W3V8KkIXvaXJDaHw
 NvfZdrldf5G3FyQNtrJWjh1UuSL9riBww3QwSefUGLKzYqK8W8Be1P+W4RJ3dN7HJyDt
 chTA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:mime-version:from:date:message-id:subject:to;
 bh=OpwXm8g1opYzlyZ/bw2hXz5aBDpGBd2PnW1yFMDnUeY=;
 b=skW9I1Ku8ZVeQ8MUuqq/eoVuCAG3LABXlJGyG+6GVMJX3LSxAutmddGaGAbxXDHzeb
 huddEJoRDGXq/+LM1jH/mkgq9bSiZR1JS54mmUi9RC0Dr6oN4KogxpDgC7Yphod9BW6j
 15X/HzQg8c9UMk+4kaLE3Wh/S3wtsPoRI2YaXJlcGHhtG3wYpDdjL+XMws4thedlm2tY
 b8uIyxz0llDagNHy8hiVs0fQsp4aqnfzIDbI2MqXmjChO/REFBha9W1hbVXfT5f6C0XQ
 u2uBtf2tMMYv8Op8IHc5YzE1K6Er4fSqFfD1CkYIvP11QEWsMjFx5scmJtwHIKY80GD4
 xtRA==
X-Gm-Message-State: APzg51DH+QS2EJLG5h+/zrGPVb0wqFMiJ6m/pY2hof00VHKmHYy8xJHl
 1+d61Em1c2eTzqC4MSx2POeSBZFDvPHpa8ZBW4MG033+
X-Google-Smtp-Source: ANB0VdYkpOmq27vUOkhtVcr4HXWI7fLzd9HjuMQK6RBKteFAJXnKdFp+H/FtIfAadOxGZFJpmf02o8PhY2SBQkwNLtE=
X-Received: by 2002:a67:374c:: with SMTP id
 e73-v6mr11681763vsa.10.1537435307256; 
 Thu, 20 Sep 2018 02:21:47 -0700 (PDT)
MIME-Version: 1.0
From: Frank Ruben <frankruben27@HIDDEN>
Date: Thu, 20 Sep 2018 11:21:36 +0200
Message-ID: <CAOi78yApK+qV3wPbP7Wk54K=rcNO3BuusEAP24s8t5wVOQTx3Q@HIDDEN>
Subject: Minimal fix for guile.el
To: bug-guile@HIDDEN
Content-Type: multipart/alternative; boundary="0000000000005aaf5105764a0d3a"
X-detected-operating-system: by eggs.gnu.org: Genre and OS details not
 recognized.
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x
X-Received-From: 2001:4830:134:3::11
X-Spam-Score: -3.8 (---)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -4.8 (----)

--0000000000005aaf5105764a0d3a
Content-Type: text/plain; charset="UTF-8"

Hi,

in file
http://git.savannah.gnu.org/gitweb/?p=guile.git;a=blob_plain;f=emacs/guile.el;hb=HEAD
there is a definition of procedure `guile:make-adapter`. The second
let-binding `(libs (if guile-channel-file (list "-l" guile-channel-file)
nil))` is not necessary as the libraries are anyway initialized in the
subsequent let-binding via the result of procedure `guile-libs` (with some
more logic).

Thanks for guile and greetings to Andy Wingo - he's one of my programming
heroes ;)
Frank

--0000000000005aaf5105764a0d3a
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr"><div dir=3D"ltr"><div dir=3D"ltr"><div dir=3D"ltr"><div di=
r=3D"ltr"><div>Hi,</div><div><br></div><div>in file <a href=3D"http://git.s=
avannah.gnu.org/gitweb/?p=3Dguile.git;a=3Dblob_plain;f=3Demacs/guile.el;hb=
=3DHEAD">http://git.savannah.gnu.org/gitweb/?p=3Dguile.git;a=3Dblob_plain;f=
=3Demacs/guile.el;hb=3DHEAD</a> there is a definition of procedure `guile:m=
ake-adapter`. The second let-binding `(libs (if guile-channel-file (list &q=
uot;-l&quot; guile-channel-file) nil))` is not necessary as the libraries a=
re anyway initialized in the subsequent let-binding via the result of proce=
dure `guile-libs` (with some more logic).</div><div><br></div><div>Thanks f=
or guile and greetings to Andy Wingo - he&#39;s one of my programming heroe=
s ;)</div><div>Frank</div><div><br></div></div></div></div></div></div>

--0000000000005aaf5105764a0d3a--