summaryrefslogtreecommitdiff
path: root/module/scripts
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-01-20 11:43:28 +0100
committerLudovic Courtès <ludo@gnu.org>2020-01-20 11:43:28 +0100
commitf329837fd17e462068260589138054a5c0e586b2 (patch)
treecacfc7f66625a33354196c6971fcd3ee725a552f /module/scripts
parent7b909472941faceaca701276eb019e354061b616 (diff)
downloadguile-f329837fd17e462068260589138054a5c0e586b2.tar.gz
use2dot: Fix incorrect #:autoload binding set leading to unbound variables.
* module/scripts/use2dot.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.
Diffstat (limited to 'module/scripts')
-rw-r--r--module/scripts/use2dot.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/module/scripts/use2dot.scm b/module/scripts/use2dot.scm
index 975a9c4a4..b8b7db7eb 100644
--- a/module/scripts/use2dot.scm
+++ b/module/scripts/use2dot.scm
@@ -1,6 +1,6 @@
;;; use2dot --- Display module dependencies as a DOT specification
-;; Copyright (C) 2001, 2006, 2011 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2006, 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
@@ -47,11 +47,11 @@
;;; Code:
(define-module (scripts use2dot)
- :autoload (ice-9 getopt-long) (getopt-long)
- :use-module ((srfi srfi-13) :select (string-join))
- :use-module ((scripts frisk)
- :select (make-frisker edge-type edge-up edge-down))
- :export (use2dot))
+ #:use-module (ice-9 getopt-long)
+ #:use-module ((srfi srfi-13) #:select (string-join))
+ #:use-module ((scripts frisk)
+ #:select (make-frisker edge-type edge-up edge-down))
+ #:export (use2dot))
(define %summary "Print a module's dependencies in graphviz format.")