fix err-msg test
svn: r5559
This commit is contained in:
parent
fda3b2aa21
commit
44623776c0
|
@ -125,7 +125,7 @@
|
|||
(with-handlers ([void
|
||||
(lambda (exn)
|
||||
(if (regexp-match
|
||||
(format "unknown flag: ~s" name)
|
||||
(format "unknown switch: ~s" name)
|
||||
(exn-message exn))
|
||||
'yes-it-worked
|
||||
exn))])
|
||||
|
|
Loading…
Reference in New Issue
Block a user