diff options
Diffstat (limited to 'scheme')
| -rw-r--r-- | scheme/chicken/geiser/emacs.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scheme/chicken/geiser/emacs.scm b/scheme/chicken/geiser/emacs.scm index 67f5449..03c5d97 100644 --- a/scheme/chicken/geiser/emacs.scm +++ b/scheme/chicken/geiser/emacs.scm @@ -229,7 +229,7 @@ (string-append "^([^#]+#)*" (regexp-escape prefix))) (define (describe-symbol sym #!key (exact? #f)) - (let* ((str (symbol->string sym)) + (let* ((str (->string sym)) (found (apropos-information-list (regexp (make-apropos-regex str)) #:macros? #t))) (delete-duplicates (if exact? @@ -339,7 +339,7 @@ ;; Builds a signature list from an identifier (define (find-signatures toplevel-module sym) - (define str (symbol->string sym)) + (define str (->string sym)) (define (make-module-list sym module-sym) (if (null? module-sym) |