🚀 go-pugleaf

fellow net-junkies,

i'm trying to modify a font so that the control-H backspaces along with
printing nothing.  this will allow me to print UNIX man pages and the
like without having to search the file for control-H's.  here is how
i'm trying using the example on pp 99-100 in the "red book".  i can get
'normal' letters to backspace, like the '/one' in the following
example;  how do i specify control-H in the place of the '/one'?  if
there is an easier way to get control-H to backspace, please let me
know at the following address

	mucho appreciado 
		steve beaty@handel.colostate.edu

----------------------------------------
%!
/Courier findfont

dup length 1 add dict /newdict exch def
{
	1 index /FID ne
	{
		newdict 3 1 roll put
	}
	{
		pop pop
	}
	ifelse
} 
forall

1 dict begin
	/one -100 def				% replace /one with ?
	newdict /Metrics currentdict put
end

/My-Courier newdict definefont pop
/My-Courier findfont 12 scalefont setfont

100 100 moveto
(ABC123DEF) show				% test overstrike
showpage
----------------------------------------