summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/hyperref/hdvipson.def
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/hyperref/hdvipson.def')
-rw-r--r--Master/texmf-dist/tex/latex/hyperref/hdvipson.def77
1 files changed, 35 insertions, 42 deletions
diff --git a/Master/texmf-dist/tex/latex/hyperref/hdvipson.def b/Master/texmf-dist/tex/latex/hyperref/hdvipson.def
index cbe393a29dd..1af801080cc 100644
--- a/Master/texmf-dist/tex/latex/hyperref/hdvipson.def
+++ b/Master/texmf-dist/tex/latex/hyperref/hdvipson.def
@@ -24,16 +24,16 @@
%% given in the file `manifest.txt'.
%%
\ProvidesFile{hdvipson.def}
- [2008/04/20 v6.77s
+ [2008/04/22 v6.77t
Hyperref driver for dvipsone]
\providecommand*\@pdfborder{0 0 1}
\providecommand*\@pdfborderstyle{}
+\def\literalps@out#1{\special{ps:#1}}%
+\def\headerps@out#1{\special{headertext=#1}}%
\input{pdfmark.def}%
\ifx\@pdfproducer\relax
\def\@pdfproducer{dvipsone + Distiller}%
\fi
-\def\literalps@out#1{\special{ps:#1}}%
-\def\headerps@out#1{\special{! #1}}%
\def\PDF@FinishDoc{%
\Hy@UseMaketitleInfos
\special{PDF: Keywords \@pdfkeywords}%
@@ -142,52 +142,45 @@
72 add exch pop null exch null%
}
\def\Hy@BorderArrayPatch{BorderArrayPatch}
-\special{headertext=%
- /DvipsToPDF { 65781 div } def%
- /PDFToDvips { 65781 mul } def%
- /BPToDvips{65781 mul}def%
- /HyperBorder { 1 PDFToDvips } def%
- /H.B {/Rect[pdf@llx pdf@lly pdf@urx pdf@ury]} def%
+\g@addto@macro\Hy@FirstPageHook{%
+ \headerps@out{%
+ /DvipsToPDF { 65781 div } def%
+ /PDFToDvips { 65781 mul } def%
+ /BPToDvips{65781 mul}def%
+ /HyperBorder { 1 PDFToDvips } def%
+ /H.B {/Rect[pdf@llx pdf@lly pdf@urx pdf@ury]} def%
/BorderArrayPatch{%
[exch{%
dup dup type/integertype eq exch type/realtype eq or%
{BPToDvips}if%
}forall]%
}def%
- /H.S {%
- currentpoint %
- HyperBorder add /pdf@lly exch def %
- dup DvipsToPDF 72 add /pdf@hoff exch def %
- HyperBorder sub /pdf@llx exch def%
- } def%
- /H.L {%
- 2 sub %
- PDFToDvips /HyperBase exch def %
- currentpoint %
- HyperBase sub /pdf@ury exch def%
- /pdf@urx exch def%
- } def%
- /H.A {%
- H.L %
- currentpoint exch pop %
- HyperBase sub % baseline skip
- DvipsToPDF /pdf@voff exch def%
- } def%
- /H.R {%
- currentpoint %
- HyperBorder sub /pdf@ury exch def %
- HyperBorder add /pdf@urx exch def %
- currentpoint exch pop DvipsToPDF /pdf@voff exch def%
- } def %
- systemdict%
- /pdfmark known%
- {%
- userdict /?pdfmark /exec load put%
- }{%
- userdict /?pdfmark /pop load put %
- userdict /pdfmark systemdict /cleartomark get put%
+ /H.S {%
+ currentpoint %
+ HyperBorder add /pdf@lly exch def %
+ dup DvipsToPDF 72 add /pdf@hoff exch def %
+ HyperBorder sub /pdf@llx exch def%
+ } def%
+ /H.L {%
+ 2 sub %
+ PDFToDvips /HyperBase exch def %
+ currentpoint %
+ HyperBase sub /pdf@ury exch def%
+ /pdf@urx exch def%
+ } def%
+ /H.A {%
+ H.L %
+ currentpoint exch pop %
+ HyperBase sub % baseline skip
+ DvipsToPDF /pdf@voff exch def%
+ } def%
+ /H.R {%
+ currentpoint %
+ HyperBorder sub /pdf@ury exch def %
+ HyperBorder add /pdf@urx exch def %
+ currentpoint exch pop DvipsToPDF /pdf@voff exch def%
+ } def%
}%
- ifelse%
}
\endinput
%%