ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-24 11:39:46 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

scripts: build: Format strings before calling display-hint.

Browse source 
* 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:
Zhu Zihao 2022-09-18 12:31:02 +08:00 committed by Mathieu Othacehe
parent 51ab8b8553
commit 9022b942ec
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
guix/scripts/build.scm
View file

@ -383,8 +383,9 @@ (define %standard-cross-build-options
(format #f (G_ "Did you mean @code{~a}? (format #f (G_ "Did you mean @code{~a}?
Try @option{--list-targets} to view available targets.~%") Try @option{--list-targets} to view available targets.~%")
closest)) closest))
(display-hint (G_ "\ (display-hint
Try @option{--list-targets} to view available targets.~%"))) (format #f (G_ "\
Try @option{--list-targets} to view available targets.~%"))))
(exit 1)))))))) (exit 1))))))))
(define %standard-native-build-options (define %standard-native-build-options
@ -409,8 +410,9 @@ (define %standard-native-build-options
(format #f (G_ "Did you mean @code{~a}? (format #f (G_ "Did you mean @code{~a}?
Try @option{--list-systems} to view available system types.~%") Try @option{--list-systems} to view available system types.~%")
closest)) closest))
(display-hint (G_ "\ (display-hint
Try @option{--list-systems} to view available system types.~%"))) (format #f (G_ "\
Try @option{--list-systems} to view available system types.~%"))))
(exit 1)))))))) (exit 1))))))))