summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/ui.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index c1c9b6e3ea..d4c912a02e 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -1465,8 +1465,7 @@ HYPERLINKS? is true, emit hyperlink escape sequences when appropriate."
(string-map (match-lambda
(#\newline #\space)
(chr chr))
- (or (and=> (package-synopsis-string p) P_)
- "")))
+ (or (package-synopsis-string p) "")))
(format port "~a~%"
(string->recutils
(string-trim-right