typo: error message in parse-command-line
This commit is contained in:
parent
662fd84eda
commit
1e29362dad
|
@ -260,7 +260,7 @@
|
|||
(bad-table "~a line must be a string: ~e" (car spec) line))
|
||||
(begin
|
||||
(unless (and (list? line) (= (length line) 3))
|
||||
(bad-table "spec-line must be a list of at three or four items: ~e" line))
|
||||
(bad-table "spec-line must be a list of three or four items: ~e" line))
|
||||
(unless (list? (car line))
|
||||
(bad-table "flags part of a spec-line must be a list: ~e" (car line)))
|
||||
(for ([flag (in-list (car line))])
|
||||
|
|
Loading…
Reference in New Issue
Block a user