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

Fix pdf-slatex to recognize the '-n' option (and to fail appropriately on

Browse Source 
unknown options).

svn: r11086
This commit is contained in:
Stevie Strickland 2008-08-05 18:18:28 +00:00
parent 5f787a63d4
commit 2d042efe7a
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
collects/slatex/pdf-slatex-launcher.ss
View File

@ -13,9 +13,19 @@
(when (equal? (vector) argv) (when (equal? (vector) argv)
(fprintf (current-error-port) "pdf-slatex: expected a file on the command line\n") (fprintf (current-error-port) "pdf-slatex: expected a file on the command line\n")
(exit 1)) (exit 1))
(let ([result (let* ([filename
(command-line
#:program "slatex"
#:once-each
[("-n" "--no-latex") "Just preprocess, don't run LaTeX"
(no-latex #t)]
#:args (filename)
filename)]
[result
(parameterize ([error-escape-handler exit]) (parameterize ([error-escape-handler exit])
(pdf-slatex (vector-ref argv 0)))]) (if (no-latex)
(slatex/no-latex filename)
(pdf-slatex filename)))])
(if result (if result
(exit) (exit)
(exit 1)))])) (exit 1)))]))