diff options
| author | Ludovic Courtes | 2005-07-02 03:51:27 +0000 |
|---|---|---|
| committer | Ludovic Courtes | 2005-07-02 03:51:27 +0000 |
| commit | 6269aa26309cf98d100d7580c09ccf63b504d0d8 (patch) | |
| tree | b200f6be109cf7421b06592a6620a00d2dbed965 /src/guile/skribilo.scm | |
| parent | 2d740bec3cc50480980d8aae3a06e27a5f0649e5 (diff) | |
| download | skribilo-6269aa26309cf98d100d7580c09ccf63b504d0d8.tar.gz skribilo-6269aa26309cf98d100d7580c09ccf63b504d0d8.tar.lz skribilo-6269aa26309cf98d100d7580c09ccf63b504d0d8.zip | |
First real document produced!
Lots of things, including:
* src/guile/skribilo/engine/lout.scm: New file.
First real document produced!
git-archimport-id: lcourtes@laas.fr--2005-mobile/skribilo--devel--1.2--patch-4
Diffstat (limited to 'src/guile/skribilo.scm')
| -rwxr-xr-x | src/guile/skribilo.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/guile/skribilo.scm b/src/guile/skribilo.scm index a43ec66..33c2bb4 100755 --- a/src/guile/skribilo.scm +++ b/src/guile/skribilo.scm @@ -387,7 +387,7 @@ Processes a Skribilo/Skribe source file and produces its output. skribilo-options)) (engine (string->symbol (option-ref options 'target "html"))) - (debugging-level (option-ref options 'debug 0)) + (debugging-level (option-ref options 'debug "0")) (load-path (option-ref options 'load-path ".")) (bib-path (option-ref options 'bib-path ".")) (preload '()) @@ -455,6 +455,8 @@ Processes a Skribilo/Skribe source file and produces its output. (with-output-to-file dest-file doskribe) (doskribe))))) + (set! *skribe-dest* dest-file) + (if (and dest-file (file-exists? dest-file)) (delete-file dest-file)) |