*** empty log message ***

original commit: bcdac75025c1d8a9b869b39acbf4223b10e6e59d
This commit is contained in:
Paul Graunke 2002-07-26 00:51:16 +00:00
parent dbbed8f02c
commit f3a3cd6605

View File

@ -14,7 +14,6 @@
(opt-lambda (str [separate-window? separate-by-default?])
; The with-handler reverts to the old error port before printing raised error messages.
(with-handlers ([void (lambda (exn) (raise exn))])
(printf "trying!~n")
(parameterize ([current-input-port null-input]
[current-error-port null-output]
[current-output-port null-output])
@ -211,4 +210,4 @@
(equal? (parse-command.com (open-input-string "a\\\\\\\"b c d"))
'("a\\\"b" "c" "d"))
(equal? (parse-command.com (open-input-string "a\\\\\\\\\"b c\" d e"))
'("a\\\\b c" "d" "e")))))
'("a\\\\b c" "d" "e")))))