Cyclone-Team/gramps
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[r22030]Supply a concatstrings PostScript function

Browse Source 
To allow postscript documents to work without Ghostscript.

svn: r22047
This commit is contained in:
John Ralls 2013-04-20 23:23:18 +00:00
parent 50e43f51c9
commit edd40cafa3
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gramps/plugins/docgen/psdrawdoc.py
View File

@ -123,6 +123,13 @@ class PSDrawDoc(BaseDoc, DrawDoc):
self.file.write( self.file.write(
'%%EndComments\n' '%%EndComments\n'
'/cm { 28.34 mul } def\n' '/cm { 28.34 mul } def\n'
'%% Copied from http://en.wikibooks.org/wiki/PostScript_FAQ#How_to_concatenate_strings.3F, where it\'s attributed to Ghostscript, which might be why it worked originally\n'
'/concatstrings % (a) (b) -> (ab)\n'
' { exch dup length\n'
' 2 index length add string\n'
' dup dup 4 2 roll copy length\n'
' 4 -1 roll putinterval\n'
' } bind def\n'
'% build iso-latin-1 version of a font\n' '% build iso-latin-1 version of a font\n'
'/font-to-iso-latin-1 { % <font> font-to-iso-latin-1 <font>\n' '/font-to-iso-latin-1 { % <font> font-to-iso-latin-1 <font>\n'
'%% reencode for iso latin1; from the 2nd edition red book, sec 5.6.1\n' '%% reencode for iso latin1; from the 2nd edition red book, sec 5.6.1\n'