diff options
| -rw-r--r-- | src/guile/skribilo/engine/lout.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm index 43aa356..f71566f 100644 --- a/src/guile/skribilo/engine/lout.scm +++ b/src/guile/skribilo/engine/lout.scm @@ -1567,10 +1567,11 @@ :before (lambda (n e) (let* ((w (markup-option n :width)) (fg (markup-option n :fg))) - (printf "{ ~a } @Color { " (lout-color-specification fg)))) + (printf "{ { ~a } @Color { " (lout-color-specification fg)))) :after (lambda (n e) - (display " }"))) + ;; Skip a line to avoid hitting Basser Lout's length limit. + (display " } }\n"))) ;*---------------------------------------------------------------------*/ ;* frame ... */ |