(define-module (click util)
+ #:use-module (ice-9 getopt-long)
+ #:use-module (ice-9 readline)
#:use-module (click constant)
#:export (getopt-long-option-spec
option-property
program-name
%program-name))
+
(define %program-name (make-fluid "guile"))
(define (program-name)
(fluid-ref %program-name))