diff options
author | Karl Berry <karl@freefriends.org> | 2014-05-14 22:08:43 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2014-05-14 22:08:43 +0000 |
commit | 0e4d93dadf0f1cbaa9d8819eb2d8a323968cef73 (patch) | |
tree | b7302f81135d10d1e0956299822af0ddefa9ee07 /Master/texmf-dist/tex/generic | |
parent | edb8fd9cd71fb2e6cac92760f74f7204ba25b46d (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.tex | 29 |
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}} |