bug fix: spaces => space

svn: r4559
This commit is contained in:
Matthew Flatt 2006-10-12 06:37:32 +00:00
parent 625be3eab9
commit 5d246f2f0d

View File

@ -56,7 +56,7 @@
[else (unless (= (bytes-length (readline-prompt-spaces))
(bytes-length p))
(readline-prompt-spaces (make-bytes (bytes-length p) 32)))
(readline-prompt 'spaces) ; use spaces next time
(readline-prompt 'space) ; use spaces next time
p])))
(provide readline-input)