diff options
Diffstat (limited to '')
-rw-r--r-- | module/text/markup.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/module/text/markup.scm b/module/text/markup.scm index a7a905df..62f93b0c 100644 --- a/module/text/markup.scm +++ b/module/text/markup.scm @@ -65,6 +65,7 @@ (map (lambda (line) (sxml->ansi-text `(group (ws (@ (minwidth 4))) ,line (br)))) (flow-text (string-concatenate (map sxml->ansi-text body)) + ;; TODO shouldn't this use (- width 4)? width: 66)))] [(ws) (make-string (aif (assoc-ref args 'minwidth) (car it) 1) |