From 297775ce69032473846dd180410bbe596b9193b8 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Sat, 3 May 2003 20:52:31 +0000 Subject: [PATCH] (display-usage-report): Use keyword->symbol instead of keyword-symbol, which doesn't exist. Thanks to Kevon Ryde. --- ice-9/boot-9.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm index daeb33496..e1b2415b9 100644 --- a/ice-9/boot-9.scm +++ b/ice-9/boot-9.scm @@ -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)