suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug fix: spaces => space

Browse Source 
svn: r4559
This commit is contained in:
Matthew Flatt 2006-10-12 06:37:32 +00:00
parent 625be3eab9
commit 5d246f2f0d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/readline/pread.ss
View File

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