cmdline: three/four items -> three items

This commit is contained in:
Kevin Robert Stravers 2018-11-01 19:40:41 +01:00 committed by Alexis King
parent 209a90d281
commit 22cf2750a7

View File

@ -272,7 +272,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 three or four items: ~e" line))
(bad-table "spec-line must be a list of three 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))])