🚀 go-pugleaf

In article <7304@charon.cwi.nl> Huub.Bakker@cwi.nl writes:
>A week ago I posted a question about printing problems with punidraw.ps. I
>received mail of other people having the same problem. But no one of us has a
>solution. 

The problem (for me) was that the dvi2ps PostScript prologue was configured
for an American Apple LaserWriter. It expects the letter paper tray to be
installed if it finds that the operators "letter" or "lettertray" are known
to the PostScript interpreter. On my DEC LPS40, although lettertray is
supported, the tray currently installed is a4, which causes a "rangecheck
error" during processing of the job. I suspect that something similar is
happening to others.

The issue is slightly complicated by the inclusion of some very long lines
in the PostScript file, making hand editing difficult. Dvi2ps is not alone
in this, many micro-based packages cause similar problems.

Below is a patch which solves the problem for me. It simply comments out the
requests for letter-sized paper, leaving the document to use whatever you
have set as your default. I suspect that the same patch will work (except
for filenames) for the same problem in other dvi2ps output, so you might
want to cut-out-and-keep.

Ian.


*** punidraw.ps	Mon Sep 14 10:31:48 1992
--- punidraw.ps.new	Mon Sep 14 10:30:42 1992
***************
*** 88,100 ****
  	72 Resolution div dup neg matrix scale	% set scaling to 1/pixel
  	/Mtrx exch def
  	Mtrx 4 72 put    Mtrx 5 720 put		%  origin to top-left
! 	statusdict /letter known
! 	{ statusdict /letter get exec }
! 	{ statusdict /lettertray known
! 		{ statusdict /lettertray get exec }
! 		if
! 	}
! 	ifelse
  } def
  /$note {		% note is like letter, except it uses less VM
  	$letter					%  Use letter settings
--- 88,100 ----
  	72 Resolution div dup neg matrix scale	% set scaling to 1/pixel
  	/Mtrx exch def
  	Mtrx 4 72 put    Mtrx 5 720 put		%  origin to top-left
! %	statusdict /letter known
! %	{ statusdict /letter get exec }
! %	{ statusdict /lettertray known
! %		{ statusdict /lettertray get exec }
! %		if
! %	}
! %	ifelse
  } def
  /$note {		% note is like letter, except it uses less VM
  	$letter					%  Use letter settings