diff options
| author | Karl Berry <karl@freefriends.org> | 2012-10-17 00:54:25 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2012-10-17 00:54:25 +0000 |
| commit | 1b9a60f4032a22fb0059c0dce245273099ba5bab (patch) | |
| tree | a07a15c64fd73b7283a5b0b3077aeabe049c4cdc /Master/texmf-dist/tex/generic/pst-tools | |
| parent | 305b1f89f31f104e84e5d0bb003db37df5f2641f (diff) | |
pst-tools (16oct12)
git-svn-id: svn://tug.org/texlive/trunk@27986 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-tools')
| -rw-r--r-- | Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex b/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex index a6e4cad0e72..81885f0fea8 100644 --- a/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex +++ b/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex @@ -26,17 +26,20 @@ % interface to the `xkeyval' package \pst@addfams{pst-tools} % -\def\fileversion{0.1} -\def\filedate{2012/01/01} +\def\fileversion{0.02} +\def\filedate{2012/10/16} \message{`PST-tools' v\fileversion, \filedate\space (hv)} % \define@boolkey[psset]{pst-tools}[Pst@]{dot}[true]{} +\define@boolkey[psset]{pst-tools}[Pst@]{trimSpaces}[true]{} \define@key[psset]{pst-tools}{xShift}[0]{\def\psk@xShift{#1}} +\define@key[psset]{pst-tools}{postString}[]{\def\psk@postString{#1}} \define@key[psset]{pst-tools}{PSfont}[Times-Roman]{\def\psk@PSfont{/#1 }} \define@key[psset]{pst-tools}{valuewidth}[10]{\pst@getint{#1}\psk@valuewidth } \define@key[psset]{pst-tools}{fontscale}[10]{\pst@checknum{#1}\psk@fontscale } \define@key[psset]{pst-tools}{decimals}[-1]{\pst@getint{#1}\psk@decimals } -\psset[pst-tools]{PSfont=Times-Roman,fontscale=10,valuewidth=10,decimals=-1,xShift=0,dot} +\psset[pst-tools]{PSfont=Times-Roman,fontscale=10,valuewidth=10,decimals=-1, + xShift=0,dot,trimSpaces=false,postString={}} % \def\psPrintValue{\pst@object{psPrintValue}} \def\psPrintValue@i#1{\expandafter\psPrintValue@ii#1,,\@nil} @@ -51,6 +54,9 @@ \else #1 \fi \psk@decimals -1 gt { 10 \psk@decimals exp dup 3 1 roll mul cvi exch div } if \psk@valuewidth string cvs %/Output exch def % save output +%/concatstringarray{ % [(a) (b) ... (z)] --> (ab...z) 20100422 + \ifx\relax\psk@postString\relax\else [ exch (\psk@postString) ] concatstringarray \fi + \ifPst@trimSpaces rightTrim \fi \ifPst@dot dot2comma \fi % do we have to change dot to comma \psk@xShift\space 0 moveto %Output show grestore |