summaryrefslogtreecommitdiffstats
path: root/getparam.scm
diff options
context:
space:
mode:
Diffstat (limited to 'getparam.scm')
-rw-r--r--getparam.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/getparam.scm b/getparam.scm
index da8ce04..21d7d39 100644
--- a/getparam.scm
+++ b/getparam.scm
@@ -104,7 +104,7 @@
(let ((str (string-copy (car alias))))
(do ((i (+ -1 (string-length str)) (+ -1 i)))
((negative? i) (cons str (cdr alias)))
- (cond ((char=? #\ (string-ref str i))
+ (cond ((char=? #\space (string-ref str i))
(string-set! str i #\-))))))
((number? (car alias))
(set! positional? (car alias))