diff options
Diffstat (limited to 'minimun.orig')
| -rw-r--r-- | minimun.orig | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/minimun.orig b/minimun.orig index bf07a25..5ad7dc8 100644 --- a/minimun.orig +++ b/minimun.orig @@ -41,11 +41,9 @@ else{ $in .= "\\bye\n"; my $timestamp = time; -run ['/usr/bin/pdftex', '-jobname', "$timestamp", 'format.tex'], '<', \$in, '>', \$out; +run ['/usr/bin/pdftex', '-jobname', "/tmp/$timestamp", 'format.tex'], '<', \$in, '>', \$out; print "Content-type: application/pdf\n\n"; -open(DOC, '<', "$timestamp.pdf"); -while (<DOC>){ - print; -} +open(DOC, '<', "/tmp/$timestamp.pdf"); +print <DOC>; close(DOC); -unlink "$timestamp.pdf", "$timestamp.log"; +unlink "/tmp/$timestamp.pdf", "/tmp/$timestamp.log"; |