substitute: Fix handling of short option "-h".

The short option was listed in the help-text, but not recognized.
This commit is contained in:
Hartmut Goebel 2021-07-07 22:58:45 +02:00
parent 68ce40cad7
commit f3b20baa4d
No known key found for this signature in database
GPG key ID: 634A8DFFD3F631DF

View file

@ -777,7 +777,7 @@ (define reply-port
(loop)))))) (loop))))))
((or ("-V") ("--version")) ((or ("-V") ("--version"))
(show-version-and-exit "guix substitute")) (show-version-and-exit "guix substitute"))
(("--help") ((or ("-h") ("--help"))
(show-help)) (show-help))
(opts (opts
(leave (G_ "~a: unrecognized options~%") opts)))))) (leave (G_ "~a: unrecognized options~%") opts))))))