1 files changed, 236 insertions, 0 deletions

diff --git a/textproc/unrtf/files/patch-ps.c b/textproc/unrtf/files/patch-ps.c
new file mode 100644
index 000000000000..3ed8dd788592
--- /dev/null
+++ b/textproc/unrtf/files/patch-ps.c
@@ -0,0 +1,236 @@
+--- ps.c.orig	Tue Jul 22 18:56:13 2003
++++ ps.c	Tue Jul 22 19:02:44 2003
+@@ -187,7 +187,7 @@
+ /didShowPage false def \n\
+ %%------------------------------------------------------\n\
+ %% Set up the ISO fonts \n\
+-
++\n\
+ %% Times \n\
+ %% ----- \n\
+ /Times-Roman findfont dup length dict begin {		\n\
+@@ -196,28 +196,28 @@
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /TRomanISO exch definefont pop			\n\
+-
++\n\
+ /Times-Bold findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /TBoldISO exch definefont pop			\n\
+-
++\n\
+ /Times-BoldItalic findfont dup length dict begin {	\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /TBoldItalicISO exch definefont pop			\n\
+-
++\n\
+ /Times-Italic findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /TItalicISO exch definefont pop			\n\
+-
++\n\
+ %% Courier \n\
+ %% ----- \n\
+ /Courier-Roman findfont dup length dict begin {		\n\
+@@ -226,28 +226,28 @@
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /CRomanISO exch definefont pop			\n\
+-
++\n\
+ /Courier-Bold findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /CBoldISO exch definefont pop			\n\
+-
++\n\
+ /Courier-BoldItalic findfont dup length dict begin {	\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /CBoldItalicISO exch definefont pop			\n\
+-
++\n\
+ /Courier-Italic findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /CItalicISO exch definefont pop			\n\
+-
++\n\
+ %% Symbol \n\
+ %% ----- \n\
+ /Symbol-Roman findfont dup length dict begin {		\n\
+@@ -256,28 +256,28 @@
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /SRomanISO exch definefont pop			\n\
+-
++\n\
+ /Symbol-Bold findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /SBoldISO exch definefont pop			\n\
+-
++\n\
+ /Symbol-BoldItalic findfont dup length dict begin {	\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /SBoldItalicISO exch definefont pop			\n\
+-
++\n\
+ /Symbol-Italic findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /SItalicISO exch definefont pop			\n\
+-
++\n\
+ %% Helvetica \n\
+ %% --------- \n\
+ /Helvetica-Roman findfont dup length dict begin {		\n\
+@@ -286,28 +286,28 @@
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /HRomanISO exch definefont pop			\n\
+-
++\n\
+ /Helvetica-Bold findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /HBoldISO exch definefont pop			\n\
+-
++\n\
+ /Helvetica-BoldOblique findfont dup length dict begin {	\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /HBoldItalicISO exch definefont pop			\n\
+-
++\n\
+ /Helvetica-Oblique findfont dup length dict begin {		\n\
+ 	1 index /FID ne { def } { pop pop } ifelse	\n\
+ } forall						\n\
+ /Encoding ISOLatin1Encoding def 			\n\
+ currentdict end						\n\
+ /HItalicISO exch definefont pop			\n\
+-
++\n\
+ %% \n\
+ %% Ideally, before we can draw a line of text, we need to collect all the\n\
+ %% words that will be on it, just as I do in my Beest HTML viewer, as well\n\
+@@ -318,39 +318,39 @@
+ %% ----------- Functions ------------\n\
+ /updateFont { \n\
+ 	/f0 null def \n\
+-	(Times) fontFamily eq (Times New Roman) fontFamily eq or {
++	(Times) fontFamily eq (Times New Roman) fontFamily eq or {\n\
+ 		bold { \n\
+ 			italic { /TBoldItalicISO } { /TBoldISO } ifelse \n\
+ 		} { \n\
+ 			italic { /TItalicISO } { /TRomanISO } ifelse \n\
+ 		} \n\
+ 		ifelse \n\
+-	} if
+-	(Helvetica) fontFamily eq (Arial) fontFamily eq or {
++	} if\n\
++	(Helvetica) fontFamily eq (Arial) fontFamily eq or {\n\
+ 		bold { \n\
+ 			italic { /HBoldItalicISO } { /HBoldISO } ifelse \n\
+ 		} { \n\
+ 			italic { /HItalicISO } { /HRomanISO } ifelse \n\
+ 		} \n\
+ 		ifelse \n\
+-	} if
+-	(Courier) fontFamily eq (Courier New) fontFamily eq or {
++	} if\n\
++	(Courier) fontFamily eq (Courier New) fontFamily eq or {\n\
+ 		bold { \n\
+ 			italic { /CBoldItalicISO } { /CBoldISO } ifelse \n\
+ 		} { \n\
+ 			italic { /CItalicISO } { /CRomanISO } ifelse \n\
+ 		} \n\
+ 		ifelse \n\
+-	} if
+-	(Symbol) fontFamily eq {
++	} if\n\
++	(Symbol) fontFamily eq {\n\
+ 		bold { \n\
+ 			italic { /SBoldItalicISO } { /SBoldISO } ifelse \n\
+ 		} { \n\
+ 			italic { /SItalicISO } { /SRomanISO } ifelse \n\
+ 		} \n\
+ 		ifelse \n\
+-	} if
+-
++	} if\n\
++\n\
+ 	findfont /f0 exch def  \n\
+ 	/bboxBottom f0 /FontBBox get 1 get 1000 div fontSize mul -1 mul def \n\
+ 	/bboxTop    f0 /FontBBox get 3 get 1000 div fontSize mul def \n\
+@@ -392,13 +392,13 @@
+ } \n\
+ def \n\
+ /acharpath { \n\
+-	/acstr exch def pop /acsp exch def
+-	newpath 
+-	str {
+-		/ch exch def
+-		1 string 0 ch put false charpath
+-		acsp 0 rmoveto
+-	} forall
++	/acstr exch def pop /acsp exch def\n\
++	newpath \n\
++	str {\n\
++		/ch exch def\n\
++		1 string 0 ch put false charpath\n\
++		acsp 0 rmoveto\n\
++	} forall\n\
+ } def \n\
+ /A { \n\
+ 	/str exch def \n\
+@@ -412,7 +412,7 @@
+ 			1 -0.1 0 {                        \n\
+ 				/offset exch def \n\
+ 				offset setgray                 \n\
+-				x offset 3 mul add y offset 3 mul sub moveto
++				x offset 3 mul add y offset 3 mul sub moveto\n\
+ 				intercharSpace 0 str acharpath \n\
+ 				%% str false charpath \n\
+ 				fontSize 30 div setlinewidth stroke \n\
+@@ -428,11 +428,11 @@
+ 			1 -0.1 0 {                        \n\
+ 				/offset exch def \n\
+ 				offset setgray                 \n\
+-				x offset 3 mul add y offset 3 mul sub moveto
++				x offset 3 mul add y offset 3 mul sub moveto\n\
+ 				intercharSpace 0 str ashow  \n\
+ 				%% str show \n\
+ 			} for                               \n\
+-			0 setgray
++			0 setgray\n\
+ 		} {                                         \n\
+ 			intercharSpace 0 str ashow          \n\
+ 			%% str show \n\