mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-24 11:39:46 -05:00
scripts: build: Format strings before calling display-hint.
* guix/scripts/build.scm(%standard-cross-build-options): Format hint string. %standard-cross-build-options: Ditto. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
parent
51ab8b8553
commit
9022b942ec
1 changed files with 6 additions and 4 deletions
|
@ -383,8 +383,9 @@ (define %standard-cross-build-options
|
|||
(format #f (G_ "Did you mean @code{~a}?
|
||||
Try @option{--list-targets} to view available targets.~%")
|
||||
closest))
|
||||
(display-hint (G_ "\
|
||||
Try @option{--list-targets} to view available targets.~%")))
|
||||
(display-hint
|
||||
(format #f (G_ "\
|
||||
Try @option{--list-targets} to view available targets.~%"))))
|
||||
(exit 1))))))))
|
||||
|
||||
(define %standard-native-build-options
|
||||
|
@ -409,8 +410,9 @@ (define %standard-native-build-options
|
|||
(format #f (G_ "Did you mean @code{~a}?
|
||||
Try @option{--list-systems} to view available system types.~%")
|
||||
closest))
|
||||
(display-hint (G_ "\
|
||||
Try @option{--list-systems} to view available system types.~%")))
|
||||
(display-hint
|
||||
(format #f (G_ "\
|
||||
Try @option{--list-systems} to view available system types.~%"))))
|
||||
(exit 1))))))))
|
||||
|
||||
|
||||
|
|
Loading…
Reference in a new issue