diff options
| author | Ludovic Courtes | 2007-07-01 23:48:43 +0000 |
|---|---|---|
| committer | Ludovic Courtes | 2007-07-01 23:48:43 +0000 |
| commit | 61d482a4b1e6e720f4607a4ebda3900c8e88c3b5 (patch) | |
| tree | c9283a83029c06cbf45c82072934df5cbc03da78 | |
| parent | 2f71af548b132d52db258bf57fc2e0e868411ef8 (diff) | |
| download | skribilo-61d482a4b1e6e720f4607a4ebda3900c8e88c3b5.tar.gz skribilo-61d482a4b1e6e720f4607a4ebda3900c8e88c3b5.tar.lz skribilo-61d482a4b1e6e720f4607a4ebda3900c8e88c3b5.zip | |
`lout' engine: Fixed argument passing for `lout-illustration'.
* src/guile/skribilo/engine/lout.scm (lout-illustration): Better compute
argument string for `lout'.
git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-129
| -rw-r--r-- | ChangeLog | 17 | ||||
| -rw-r--r-- | src/guile/skribilo/engine/lout.scm | 15 |
2 files changed, 25 insertions, 7 deletions
@@ -2,6 +2,23 @@ # arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2 # +2007-07-01 23:48:43 GMT Ludovic Courtes <ludovic.courtes@laas.fr> patch-129 + + Summary: + `lout' engine: Fixed argument passing for `lout-illustration'. + Revision: + skribilo--devo--1.2--patch-129 + + * src/guile/skribilo/engine/lout.scm (lout-illustration): Better compute + argument string for `lout'. + + modified files: + ChangeLog src/guile/skribilo/engine/lout.scm + + new patches: + lcourtes@laas.fr--2005-mobile/skribilo--devel--1.2--patch-113 + + 2007-07-01 23:48:19 GMT Ludovic Courtes <ludovic.courtes@laas.fr> patch-128 Summary: 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) |