diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-10-30 16:07:14 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-10-31 00:57:07 +0200 |
| commit | 8f455557814ef7c1402a81d87e9e45f3508f711e (patch) | |
| tree | caf693adcbbb0f0db202f0a20667b424fc087abd /guix/ui.scm | |
| parent | 943dd59beb5b30437f940405fd2b56fea73764cb (diff) | |
| download | guix-8f455557814ef7c1402a81d87e9e45f3508f711e.tar guix-8f455557814ef7c1402a81d87e9e45f3508f711e.tar.gz | |
ui: Use DISPLAY in SHOW-GUIX-HELP.
* guix/ui.scm (show-guix-help): Use DISPLAY where FORMAT isn't needed.
Diffstat (limited to 'guix/ui.scm')
| -rw-r--r-- | guix/ui.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index 4b4f21d32c..b01bb3d587 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -2098,7 +2098,7 @@ contain a 'define-command' form." (lambda (command) (eq? category (command-category command)))) - (format #t (G_ "Usage: guix OPTION | COMMAND ARGS... + (display (G_ "Usage: guix OPTION | COMMAND ARGS... Run COMMAND with ARGS, if given.\n")) (display (G_ " @@ -2108,7 +2108,7 @@ Run COMMAND with ARGS, if given.\n")) (newline) (newline) - (format #t (G_ "COMMAND must be one of the sub-commands listed below:\n")) + (display (G_ "COMMAND must be one of the sub-commands listed below:\n")) (let ((commands (commands)) (categories (module-ref (resolve-interface '(guix scripts)) |