diff options
| author | Zhu Zihao <all_but_last@163.com> | 2022-09-18 12:31:02 +0800 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-09-30 16:04:46 +0200 |
| commit | 9022b942ecd6731e87010285a55f55c24f376739 (patch) | |
| tree | 0358c6df8e14be13b9691fbdf9c323c1dd0f601e /guix/scripts | |
| parent | 51ab8b855361db7f9a13621d4099dfc6e736ff1f (diff) | |
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>
Diffstat (limited to 'guix/scripts')
| -rw-r--r-- | guix/scripts/build.scm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm index 06d9ad1f0c..0787dfcc9a 100644 --- a/guix/scripts/build.scm +++ b/guix/scripts/build.scm @@ -383,8 +383,9 @@ use '--no-offload' instead~%"))) (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 @@ Try @option{--list-targets} to view available targets.~%"))) (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)))))))) |