1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-05 03:30:24 +02:00

(display-usage-report): Use keyword->symbol instead of keyword-symbol,

which doesn't exist.  Thanks to Kevon Ryde.
This commit is contained in:
Marius Vollmer 2003-05-03 20:52:31 +00:00
parent 2b24a689f6
commit 297775ce69

View file

@ -829,7 +829,7 @@
(left-part (string-append
(with-output-to-string
(lambda ()
(map (lambda (x) (display (keyword-symbol x)) (display " "))
(map (lambda (x) (display (keyword->symbol x)) (display " "))
opts-proper)))
arg-name))
(middle-part (if (and (< (string-length left-part) 30)