suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

nicer looking output

Browse Source 
svn: r13928
This commit is contained in:
Eli Barzilay 2009-03-03 22:20:13 +00:00
parent 9297ffa2a3
commit b827890ba5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/setup/setup-unit.ss
View File

@ -817,7 +817,7 @@
#:when (regexp-match? #rx#"[.]tex$" (path-element->bytes f))) #:when (regexp-match? #rx#"[.]tex$" (path-element->bytes f)))
(let* ([pdf (scr:call 'run-pdflatex f (let* ([pdf (scr:call 'run-pdflatex f
(lambda (fmt . xs) (lambda (fmt . xs)
(apply setup-printf "pdflatex" fmt xs)))] (apply setup-printf #f fmt xs)))]
[target (build-path dest-dir pdf)]) [target (build-path dest-dir pdf)])
(when (file-exists? target) (delete-file target)) (when (file-exists? target) (delete-file target))
(copy-file pdf target))))) (copy-file pdf target)))))