diff options
Diffstat (limited to 'src/guile/skribilo/engine/lout.scm')
| -rw-r--r-- | src/guile/skribilo/engine/lout.scm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm index bc796bd..7c273ac 100644 --- a/src/guile/skribilo/engine/lout.scm +++ b/src/guile/skribilo/engine/lout.scm @@ -2811,13 +2811,14 @@ (gensym "lout-illustration"))) ".eps")) (port (open-output-pipe - (apply string-append - (or (engine-custom lout 'lout-program-name) - "lout") - " -o " output - " -EPS " - (engine-custom lout - 'lout-program-arguments))))) + (string-append + (or (engine-custom lout 'lout-program-name) + "lout") + " -o " output + " -EPS " + (string-join + (engine-custom lout + 'lout-program-arguments)))))) ;; send the illustration to Lout's standard input (display (illustration-header) port) |