guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 04/05: frisk: Fix incorrect #:autoload binding set leadi


From: Ludovic Courtès
Subject: [Guile-commits] 04/05: frisk: Fix incorrect #:autoload binding set leading to unbound variables.
Date: Mon, 20 Jan 2020 05:45:33 -0500 (EST)

civodul pushed a commit to branch master
in repository guile.

commit 7b909472941faceaca701276eb019e354061b616
Author: Ludovic Courtès <address@hidden>
AuthorDate: Mon Jan 20 11:41:38 2020 +0100

    frisk: Fix incorrect #:autoload binding set leading to unbound variables.
    
    * module/scripts/frisk.scm: Load (ice-9 getopt-long) with #:use-module
    rather than #:autoload.  With the previous #:autoload spec, 'option-ref'
    would be unbound due to the new autoload semantics.
---
 module/scripts/frisk.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/module/scripts/frisk.scm b/module/scripts/frisk.scm
index a8f7923..ae636d8 100644
--- a/module/scripts/frisk.scm
+++ b/module/scripts/frisk.scm
@@ -1,6 +1,6 @@
 ;;; frisk --- Grok the module interfaces of a body of files
 
-;;     Copyright (C) 2002, 2006, 2010, 2011 Free Software Foundation, Inc.
+;;     Copyright (C) 2002, 2006, 2010, 2011, 2020 Free Software Foundation, 
Inc.
 ;;
 ;; This program is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public License
@@ -96,12 +96,12 @@
 ;;; Code:
 
 (define-module (scripts frisk)
-  :autoload (ice-9 getopt-long) (getopt-long)
-  :use-module ((srfi srfi-1) :select (filter remove))
-  :export (frisk
-           make-frisker
-           mod-up-ls mod-down-ls mod-int?
-           edge-type edge-up edge-down))
+  #:use-module (ice-9 getopt-long)
+  #:use-module ((srfi srfi-1) :select (filter remove))
+  #:export (frisk
+            make-frisker
+            mod-up-ls mod-down-ls mod-int?
+            edge-type edge-up edge-down))
 
 (define %include-in-guild-list #f)
 (define %summary "Show dependency information for a module.")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]