From 280902e4dbd68e3b74f0d2caa4963aa79e201095 Mon Sep 17 00:00:00 2001
From: Dan Leslie <dan@ironoxide.ca>
Date: Sat, 29 Aug 2015 10:22:16 -0700
Subject: The issue arose with numerics, as well.

This change should fix it for most any input.
---
 scheme/chicken/geiser/emacs.scm | 4 ++--
 1 file 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)
-- 
cgit v1.2.3