summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-barcode
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-10-26 21:42:47 +0000
committerKarl Berry <karl@freefriends.org>2013-10-26 21:42:47 +0000
commitfb7138686dfa87a452b0135e50f0909160009bd8 (patch)
tree79cfe26f4db0441213710338405e5d35a7e62576 /Master/texmf-dist/tex/generic/pst-barcode
parentc3ad81474a43e78dcb33ddfaeebc08504bee76f1 (diff)
pst-barcode (26oct13)
git-svn-id: svn://tug.org/texlive/trunk@32004 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-barcode')
-rw-r--r--Master/texmf-dist/tex/generic/pst-barcode/pst-barcode.tex18
1 files changed, 14 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-barcode/pst-barcode.tex b/Master/texmf-dist/tex/generic/pst-barcode/pst-barcode.tex
index ea697a9f053..a0710af9811 100644
--- a/Master/texmf-dist/tex/generic/pst-barcode/pst-barcode.tex
+++ b/Master/texmf-dist/tex/generic/pst-barcode/pst-barcode.tex
@@ -19,8 +19,8 @@
\let\PSTBarcodeLoaded\endinput
\ifx\PSTricksLoaded\endinput\else\input pstricks.tex\fi
%
-\def\fileversion{0.11}
-\def\filedate{2013/10/06}
+\def\fileversion{0.12}
+\def\filedate{2013/10/26}
\message{`PST-barcode' v\fileversion, \filedate\space (tb,hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -34,7 +34,8 @@
\define@key[psset]{pst-barcode}{scalex}[1]{\def\psk@barcode@scalex{#1}}
\define@key[psset]{pst-barcode}{scaley}[1]{\def\psk@barcode@scaley{#1}}
\define@key[psset]{pst-barcode}{rotate}[0]{\pst@getangle{#1}\psk@barcode@rotate}
-\psset[pst-barcode]{transx=0,transy=0,scalex=1,scaley=1,rotate=0}
+\define@boolkey[psset]{pst-barcode}[Pst@]{file}[true]{}
+\psset[pst-barcode]{transx=0,transy=0,scalex=1,scaley=1,rotate=0,file=false}
%
\def\psbarcode{\pst@object{psbarcode}}
\def\psbarcode@i#1#2#3{%
@@ -45,7 +46,16 @@
\psk@barcode@scalex\space \psk@barcode@scaley\space
\psk@barcode@transx\space \psk@barcode@transy\space
translate scale rotate
- 0 0 moveto (#1) (#2) /#3 /uk.co.terryburton.bwipp findresource exec
+ 0 0 moveto
+ \ifPst@file
+ /File 10000 string def
+ /ExternalFile { (#1)(r) file } def
+ ExternalFile File readstring
+ ExternalFile closefile
+ File 0 rightTrim % strip the /000 on the right
+% pstack
+ \else (#1) \fi
+ (#2) /#3 /uk.co.terryburton.bwipp findresource exec
grestore
}%
\end@SpecialObj%