summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2021-10-30 16:07:14 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2021-10-31 00:57:07 +0200
commit8f455557814ef7c1402a81d87e9e45f3508f711e (patch)
treecaf693adcbbb0f0db202f0a20667b424fc087abd /guix
parent943dd59beb5b30437f940405fd2b56fea73764cb (diff)
ui: Use DISPLAY in SHOW-GUIX-HELP.
* guix/ui.scm (show-guix-help): Use DISPLAY where FORMAT isn't needed.
Diffstat (limited to 'guix')
-rw-r--r--guix/ui.scm4
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))