raco pkg: make search-ask mode work for Windows (CRLF)

More generally, trim leading an dtrailing whitespace from answers.
2013-08-19 07:15:50 -06:00 · 2013-08-19 07:15:50 -06:00 · 31c7101ec7
commit 31c7101ec7
parent 5efab46f5a
1 changed files with 1 additions and 1 deletions
--- a/racket/collects/pkg/lib.rkt
+++ b/racket/collects/pkg/lib.rkt
@ -1155,7 +1155,7 @@
    (printf question)
    (printf " [Y/n/a/?] ")
    (flush-output)
-    (match (read-line)
+    (match (string-trim (read-line (current-input-port) 'any))
      [(or "y" "Y" "")
       'yes]
      [(or "n" "N")