summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2014-05-14 22:08:43 +0000
committerKarl Berry <karl@freefriends.org>2014-05-14 22:08:43 +0000
commit0e4d93dadf0f1cbaa9d8819eb2d8a323968cef73 (patch)
treeb7302f81135d10d1e0956299822af0ddefa9ee07 /Master/texmf-dist/tex/generic
parentedb8fd9cd71fb2e6cac92760f74f7204ba25b46d (diff)
pst-ovl (14may14)
git-svn-id: svn://tug.org/texlive/trunk@34033 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic')
-rw-r--r--Master/texmf-dist/tex/generic/pst-ovl/pst-ovl.tex29
1 files changed, 15 insertions, 14 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-ovl/pst-ovl.tex b/Master/texmf-dist/tex/generic/pst-ovl/pst-ovl.tex
index 008009f2847..6b60fce4e97 100644
--- a/Master/texmf-dist/tex/generic/pst-ovl/pst-ovl.tex
+++ b/Master/texmf-dist/tex/generic/pst-ovl/pst-ovl.tex
@@ -15,28 +15,29 @@
%% in directory macros/latex/base/lppl.txt.
%%
%% DESCRIPTION:
-%% `pst-ovl' is a PSTricks related package for
+%% `pst-ovl' is a PostScript related package for
%% overlay support
%%
\csname PSTovlloaded\endcsname
\let\PSTovlloaded\endinput
%
-% Requires main PSTricks
+%% Requires main PSTricks
\ifx\PSTricksLoaded\endinput\else\input pstricks \fi
%
-\def\fileversion{0.04}
-\def\filedate{2013/12/28}
+\def\fileversion{0.06}
+\def\filedate{2014/05/12}
\message{`pst-ovl' v\fileversion, \filedate\space (tvz,hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
%
-\pstheader{pst-ovl.pro}
-%
\def\tx@BeginOL{ tx@ovlDict begin BeginOL }
\def\tx@InitOL{ tx@ovlDict begin InitOL }
\def\tx@BOL{ tx@ovlDict begin BOL end }
%
-\def\pst@initoverlay#1{\pst@Verb{ \tx@InitOL /TheOL (#1) def end }}
+\pstheader{pst-ovl.pro}
+%
+\def\pst@initoverlay#1{\pst@Verb{ \tx@InitOL end /TheOL #1 def }}
+%
\def\AltOverlayMode{%
\def\pst@initoverlay##1{%
\pst@Verb{
@@ -45,16 +46,16 @@
/Invisible {
CP newpath OLUnit itransform moveto clip newpath moveto
} def
- /TheOL (##1) def end }}}
+ /TheOL ##1 def end }}}
%
\def\pst@overlay#1{%
\edef\curr@overlay{#1}%
- \pst@Verb{ tx@ovlDict begin (#1) BOL end }%
+ \expandafter\pst@Verb\expandafter{ #1 \tx@BOL }%
\aftergroup\pst@endoverlay}
%
-\def\pst@endoverlay{\pst@Verb{ tx@ovlDict begin (\curr@overlay) BOL end }}
-\def\curr@overlay{all}
-%
+\def\pst@endoverlay{\expandafter\pst@Verb\expandafter{\curr@overlay \space \tx@BOL }}
+\def\curr@overlay{-1}
+
\newbox\theoverlaybox
%
\def\overlaybox{%
@@ -66,12 +67,12 @@
\def\putoverlaybox{%
\@pstrickserr{You must end the overlay box
before using \string\putoverlaybox}}%
- \psoverlay{main}%
+ \psoverlay{0}%
\ignorespaces}
%
\def\endoverlaybox{\endgroup\egroup}
\def\putoverlaybox#1{%
- \hbox{\pst@initoverlay{#1}\copy\theoverlaybox}}
+ \hbox{\expandafter\pst@initoverlay\expandafter{#1}\copy\theoverlaybox}}
%
\def\psoverlay{\@pstrickserr{\string\psoverlay\space
can only be used after \string\overlaybox}}