fix bad paren in spencer.scm

1999-09-30 18:33:35 +00:00 · 1999-09-30 18:33:35 +00:00 · 7246ebf7b8
parent 3c71783b76
commit 7246ebf7b8
1 changed files with 1 additions and 1 deletions
--- a/scsh/rx/spencer.scm
+++ b/scsh/rx/spencer.scm
@ -157,7 +157,7 @@
 ;;; I is the index of the char following the left brace.

 (define (parse-posix-braces s i)
-  (let ((comma (string-index s #\,) i)
+  (let ((comma (string-index s #\, i))
 	(rb (string-index s #\} i)))
    (if rb
 	(if (and comma (< comma rb))