From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Frank Ruben Newsgroups: gmane.lisp.guile.bugs Subject: bug#32780: Minimal fix for guile.el Date: Thu, 20 Sep 2018 11:21:36 +0200 Message-ID: NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: multipart/alternative; boundary="0000000000005aaf5105764a0d3a" X-Trace: blaine.gmane.org 1537435246 2938 195.159.176.226 (20 Sep 2018 09:20:46 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Thu, 20 Sep 2018 09:20:46 +0000 (UTC) To: 32780@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Thu Sep 20 11:20:42 2018 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g2v8b-0000fj-40 for guile-bugs@m.gmane.org; Thu, 20 Sep 2018 11:20:41 +0200 Original-Received: from localhost ([::1]:49037 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g2vAh-0003UM-N4 for guile-bugs@m.gmane.org; Thu, 20 Sep 2018 05:22:51 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:37797) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g2v9v-0001yi-8V for bug-guile@gnu.org; Thu, 20 Sep 2018 05:22:04 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g2v9u-0007ma-BE for bug-guile@gnu.org; Thu, 20 Sep 2018 05:22:03 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:42071) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1g2v9u-0007mU-7j for bug-guile@gnu.org; Thu, 20 Sep 2018 05:22:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1g2v9u-00044R-3l for bug-guile@gnu.org; Thu, 20 Sep 2018 05:22:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Frank Ruben Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Thu, 20 Sep 2018 09:22:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 32780 X-GNU-PR-Package: guile X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.153743531715633 (code B ref -1); Thu, 20 Sep 2018 09:22:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 20 Sep 2018 09:21:57 +0000 Original-Received: from localhost ([127.0.0.1]:46329 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g2v9p-000445-Lj for submit@debbugs.gnu.org; Thu, 20 Sep 2018 05:21:57 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:44974) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g2v9o-00043s-B3 for submit@debbugs.gnu.org; Thu, 20 Sep 2018 05:21:56 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g2v9i-0007j7-7k for submit@debbugs.gnu.org; Thu, 20 Sep 2018 05:21:51 -0400 Original-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 ) id 1g2v9i-0007iy-3w for submit@debbugs.gnu.org; Thu, 20 Sep 2018 05:21:50 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:37708) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g2v9h-0001mN-60 for bug-guile@gnu.org; Thu, 20 Sep 2018 05:21:49 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g2v9g-0007hd-9p for bug-guile@gnu.org; Thu, 20 Sep 2018 05:21:49 -0400 Original-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 ) id 1g2v9g-0007hN-57 for bug-guile@gnu.org; Thu, 20 Sep 2018 05:21:48 -0400 Original-Received: by mail-vs1-xe2b.google.com with SMTP id v18-v6so2729681vsl.11 for ; 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) 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-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.org gmane.lisp.guile.bugs:9162 Archived-At: --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
Hi,

in file http://git.savannah.gnu.org/gitweb/?p=3Dguile.git;a=3Dblob_plain;f= =3Demacs/guile.el;hb=3DHEAD there is a definition of procedure `guile:m= ake-adapter`. The second let-binding `(libs (if guile-channel-file (list &q= uot;-l" 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).

Thanks f= or guile and greetings to Andy Wingo - he's one of my programming heroe= s ;)
Frank

--0000000000005aaf5105764a0d3a--