- Fix an exception on ghostscript. (#429275)

This commit is contained in:
Akira TAGOH 2008-01-23 02:15:05 +00:00
parent ddd1ea2886
commit 15b52fa146
2 changed files with 8 additions and 5 deletions

View File

@ -26,9 +26,9 @@ diff -pruN paps-0.6.8.orig/src/libpaps.c paps-0.6.8/src/libpaps.c
- "/goto_x { fontdict begin /last_x exch def end } def\n" - "/goto_x { fontdict begin /last_x exch def end } def\n"
- "/fwd_x { fontdict begin /last_x exch last_x add def end } def\n" - "/fwd_x { fontdict begin /last_x exch last_x add def end } def\n"
+ "/draw_char { fontdict begin gsave %f dup scale last_x cvi last_y cvi translate load exec end grestore} def\n" + "/draw_char { fontdict begin gsave %f dup scale last_x cvi last_y cvi translate load exec end grestore} def\n"
+ "/goto_xy { fontdict begin /last_y exch last_y cvs def /last_x exch last_x cvs def end } def\n" + "/goto_xy { fontdict begin /last_y exch string_y cvs def /last_x exch string_x cvs def end } def\n"
+ "/goto_x { fontdict begin /last_x exch last_x cvs def end } def\n" + "/goto_x { fontdict begin /last_x exch string_x cvs def end } def\n"
+ "/fwd_x { fontdict begin /last_x exch last_x cvi add last_x cvs def end } def\n" + "/fwd_x { fontdict begin /last_x exch last_x cvi add string_x cvs def end } def\n"
"/c /curveto load def\n" "/c /curveto load def\n"
"/x /conicto load def\n" "/x /conicto load def\n"
"/l /lineto load def\n" "/l /lineto load def\n"
@ -37,7 +37,7 @@ diff -pruN paps-0.6.8.orig/src/libpaps.c paps-0.6.8/src/libpaps.c
/* Open up dictionaries */ /* Open up dictionaries */
g_string_append(paps->header, g_string_append(paps->header,
- "/fontdict 1 dict def\n" - "/fontdict 1 dict def\n"
+ "/fontdict 1 dict dup begin /last_x 16 string def /last_y 16 string def end def\n" + "/fontdict 1 dict dup begin 16 string dup /string_x exch def /last_x exch def 16 string dup /string_y exch def /last_y exch def end def\n"
"papsdict begin fontdict begin\n"); "papsdict begin fontdict begin\n");
} }

View File

@ -1,6 +1,6 @@
Name: paps Name: paps
Version: 0.6.8 Version: 0.6.8
Release: 3%{?dist} Release: 4%{?dist}
License: LGPLv2+ License: LGPLv2+
URL: http://paps.sourceforge.net/ URL: http://paps.sourceforge.net/
@ -98,6 +98,9 @@ rm -rf $RPM_BUILD_ROOT
%{_libdir}/libpaps.so %{_libdir}/libpaps.so
%changelog %changelog
* Wed Jan 23 2008 Akira TAGOH <tagoh@redhat.com> - 0.6.8-4
- Fix an exception on ghostscript. (#429275)
* Tue Jan 15 2008 Akira TAGOH <tagoh@redhat.com> - 0.6.8-3 * Tue Jan 15 2008 Akira TAGOH <tagoh@redhat.com> - 0.6.8-3
- Put %%%%Pages: after %%%%Trailer. (#424951) - Put %%%%Pages: after %%%%Trailer. (#424951)