--- html2ps.orig Wed Aug 16 23:42:03 2000 +++ html2ps Wed Oct 9 18:41:24 2002 @@ -354,8 +354,8 @@ EOR -eval "require POSIX"; -$posix = !$@; +use POSIX; +$posix = 1; %extend=('quote',1, 'font',1, 'colour',1, 'hyphenation',1); %fal=("serif","times", "sans_serif","helvetica", "monospace","courier"); @@ -495,6 +495,8 @@ die "Ghostscript is required to generate cross references\n" if($opt_R && !$package{'Ghostscript'}); $tmpname=$posix?POSIX::tmpnam():"h2p_$$"; +sysopen TMP, $tmpname, O_RDWR|O_CREAT|O_EXCL, 0600 or die "$!"; +close TMP; ($scr=$tmpname)=~/\w+$/; $tempdir=$`; @@ -3179,7 +3181,7 @@ open(SCRATCH,">$scr.tex"); print SCRATCH $tex; close SCRATCH; - `tex $scr.tex`; + `tex $scr.tex`;# seems ok, $scr not user controlled `dvips -E -o $scr.ps $scr.dvi`; open(LOG,"$scr.log"); $log=<LOG>;