summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex16
1 files changed, 13 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 3c7ec247a90..494b9e16efd 100644
--- a/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex
+++ b/Master/texmf-dist/tex/generic/pst-tools/pst-tools.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-tools.tex 527 2017-08-23 14:14:45Z herbert $
+%% $Id: pst-tools.tex 606 2017-10-02 17:34:18Z herbert $
%%
%% This is file `pst-tools.tex',
%%
@@ -26,8 +26,8 @@
% interface to the `xkeyval' package
\pst@addfams{pst-tools}
%
-\def\fileversion{0.07}
-\def\filedate{2017/08/23}
+\def\fileversion{0.08}
+\def\filedate{2017/10/02}
\message{`PST-tools' v\fileversion, \filedate\space (hv)}
%
\define@key[psset]{pst-tools}{decimalSeparator}[.]{\def\psk@decimalSeparator{#1}}%
@@ -122,6 +122,16 @@
\end@SpecialObj
}
%
+\def\psGetElement#1#2#3{% #1 index; #2 comma separated list; #3: Element as macro
+ \pst@cnto=\number#1
+ \@for\pst@tempA:=#2\do{%
+ \ifnum\pst@cnto=0 %
+ \edef#3{\pst@tempA}%
+ \fi
+ \advance\pst@cnto by -1
+ }%
+}
+
\catcode`\@=\PstAtCode\relax
%
%% END: pst-tools.tex