summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
Diffstat (limited to 'guix')
-rw-r--r--guix/ui.scm8
1 files changed, 6 insertions, 2 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index d64bb68f05..88a046a177 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -1471,8 +1471,12 @@ HYPERLINKS? is true, emit hyperlink escape sequences when appropriate."
(string->recutils
(string-trim-right
(parameterize ((%text-width width*))
- (string-append "description: "
- (or (package-description-string p) "")))
+ ;; Call 'texi->plain-text' on the concatenated string to account
+ ;; for the width of "description:" in paragraph filling.
+ (texi->plain-text
+ (string-append "description: "
+ (or (and=> (package-description p) P_)
+ ""))))
#\newline)))
(for-each (match-lambda
((field . value)