Fix error message
This commit is contained in:
parent
5930d8a31f
commit
15d3d0e0b6
1 changed files with 1 additions and 1 deletions
|
@ -160,7 +160,7 @@ elements. See `choicep'
|
||||||
Example:
|
Example:
|
||||||
(choice \"hobbies\" (:radio \"Reading\" \"Swimming\" \"Coding\"))"
|
(choice \"hobbies\" (:radio \"Reading\" \"Swimming\" \"Coding\"))"
|
||||||
(unless (choicep choice)
|
(unless (choicep choice)
|
||||||
(error "Invalid question format: ~a" choice))
|
(error "Invalid choice format: ~a" choice))
|
||||||
(multiple-value-bind (type values)
|
(multiple-value-bind (type values)
|
||||||
(resolve-input-and-choice choice)
|
(resolve-input-and-choice choice)
|
||||||
(if (string= type "combo")
|
(if (string= type "combo")
|
||||||
|
|
Loading…
Add table
Reference in a new issue