branch: elpa/geiser-chicken
commit fb5baa46dfbf6e0e69dbdf7265fbb9b4e4cb442c
Author: Dan Leslie <[email protected]>
Commit: Dan Leslie <[email protected]>
No longer show arguments as strings.
That was annoying.
---
geiser/emacs.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/geiser/emacs.scm b/geiser/emacs.scm
index 1041f57..062e2a7 100644
--- a/geiser/emacs.scm
+++ b/geiser/emacs.scm
@@ -399,7 +399,7 @@
(define (clean-arg arg)
(let ((s (->string arg)))
- (substring/shared s 0 (add1 (string-skip-right s
char-set:digit)))))
+ (string->symbol (substring/shared s 0 (add1 (string-skip-right s
char-set:digit))))))
(define (collect-args args #!key (reqs? #t) (opts? #f) (keys? #f))
(when (not (null? args))
