/usr/share/racket/pkgs/slatex/pdf-slatex-launcher.rkt is in racket-common 6.7-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | (module pdf-slatex-launcher mzscheme
(require "slatex-wrapper.rkt"
scheme/cmdline)
(module test racket/base)
(define argv (current-command-line-arguments))
(define no-latex (make-parameter #f))
(case (system-type)
[(macos)
;; set up drag and drop
(error 'slatex "pdf-slatex not supported under Mac OS Classic")]
[(windows unix macosx)
(when (equal? (vector) argv)
(eprintf "pdf-slatex: expected a file on the command line\n")
(exit 1))
(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])
(if (no-latex)
(slatex/no-latex filename)
(pdf-slatex filename)))])
(if result
(exit)
(exit 1)))]))
|