From 5d246f2f0dff0fa887b5a11b77846abe0b5b64b3 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 12 Oct 2006 06:37:32 +0000 Subject: [PATCH] bug fix: spaces => space svn: r4559 --- collects/readline/pread.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/readline/pread.ss b/collects/readline/pread.ss index 263b7346c5..f6e29f53df 100644 --- a/collects/readline/pread.ss +++ b/collects/readline/pread.ss @@ -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)