summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/lib/pdf2dsc.ps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlgs/lib/pdf2dsc.ps')
-rw-r--r--Master/tlpkg/tlgs/lib/pdf2dsc.ps7
1 files changed, 5 insertions, 2 deletions
diff --git a/Master/tlpkg/tlgs/lib/pdf2dsc.ps b/Master/tlpkg/tlgs/lib/pdf2dsc.ps
index a18d82f72ef..97d47ba1c65 100644
--- a/Master/tlpkg/tlgs/lib/pdf2dsc.ps
+++ b/Master/tlpkg/tlgs/lib/pdf2dsc.ps
@@ -13,7 +13,7 @@
% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
% San Rafael, CA 94903, U.S.A., +1(415)492-9861.
-% $Id: pdf2dsc.ps 7838 2007-04-09 20:50:20Z alexcher $
+% $Id: pdf2dsc.ps 8546 2008-02-25 05:48:45Z alexcher $
% pdf2dsc.ps
% read pdf file and produce DSC "index" file.
%
@@ -116,6 +116,7 @@ systemdict /.setsafe known { .setsafe } if
DSCfile PDFname write==only
( \(r\) file { DELAYSAFER { .setsafe } if } stopped pop\n) puts
( pdfopen begin\n) puts
+ ( copy_trailer_attrs\n) puts
(%%EndSetup\n) puts
/.hasPageLabels false def % see "Page Labels" in the PDF Reference
@@ -199,7 +200,9 @@ systemdict /.setsafe known { .setsafe } if
% output the page label
(\() .pagePrefix
- PageToString .pageCounterType known { % format the page number
+ .pageCounterType //null ne dup {
+ PageToString .pageCounterType known and
+ } if { % format the page number
.pageCounter dup 0 gt { % don't try to format nonpositive numbers
PageToString .pageCounterType get exec
} {