ui: 'display-hint' preserves Texinfo formatting.

The previous method would mess up with @example formatting, for
instance.

* guix/ui.scm (display-hint): Parameterize '%text-width' instead of
using 'fill-paragraph'.
This commit is contained in:
Ludovic Courtès 2018-03-07 10:53:16 +01:00
parent e1ba6d49ea
commit 16de45557f
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 2 deletions

View File

@ -299,8 +299,10 @@ VARIABLE and return it, or #f if none was found."
"Display MESSAGE, a l10n message possibly containing Texinfo markup, to "Display MESSAGE, a l10n message possibly containing Texinfo markup, to
PORT." PORT."
(format port (G_ "hint: ~a~%") (format port (G_ "hint: ~a~%")
(fill-paragraph (texi->plain-text message) ;; XXX: We should arrange so that the initial indent is wider.
(terminal-columns) 8))) (parameterize ((%text-width (max 15
(- (terminal-columns) 5))))
(texi->plain-text message))))
(define* (report-load-error file args #:optional frame) (define* (report-load-error file args #:optional frame)
"Report the failure to load FILE, a user-provided Scheme file. "Report the failure to load FILE, a user-provided Scheme file.