summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-node
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-08-10 16:58:40 +0000
committerKarl Berry <karl@freefriends.org>2011-08-10 16:58:40 +0000
commitd43f1f507f2a3ce09bb87493375b10b3069f3aad (patch)
tree6cd95279292c829d472410a0809989a0b0db2c75 /Master/texmf-dist/tex/generic/pst-node
parent831b837a1b9db53246ed7ac7765338dfc6aa2caf (diff)
pst-node (2aug11)
git-svn-id: svn://tug.org/texlive/trunk@23486 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-node')
-rw-r--r--Master/texmf-dist/tex/generic/pst-node/pst-node.tex43
1 files changed, 17 insertions, 26 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-node/pst-node.tex b/Master/texmf-dist/tex/generic/pst-node/pst-node.tex
index 14eb627adf8..b88dc66e950 100644
--- a/Master/texmf-dist/tex/generic/pst-node/pst-node.tex
+++ b/Master/texmf-dist/tex/generic/pst-node/pst-node.tex
@@ -18,8 +18,8 @@
\ifx\PSTricksLoaded\endinput\else\input pstricks.tex \fi\relax
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
%
-\def\fileversion{1.17}
-\def\filedate{2011/07/04}
+\def\fileversion{1.18}
+\def\filedate{2011/08/01}
\message{ v\fileversion, \filedate}
%
\edef\TheAtCode{\the\catcode`\@}
@@ -1549,30 +1549,21 @@ end }}%
%
\def\shownode(#1){%display node user coords in console
\pst@killglue%
- \pstVerb{
- gsave tx@Dict begin /tmpar [(Node #1: ) <28> () (, ) () <29>] def %
- /str 10 string def
- STV CP T \psGetNodeCenter{#1}\space
- tmpar 2 #1.x str cvs put
- /str 10 string def
- tmpar 4 #1.y str cvs put
- tx@NodeDict /N@#1 known { tmpar concatstringarray = }{(Node #1: (NOT KNOWN)) = } ifelse
- end
- grestore }%
- \ignorespaces}%
-%
-\iffalse
-\def\shownode(#1){%display node user coords in console
- \pstVerb{ tx@Dict begin { STV CP T } exec % set scaling
- tx@NodeDict /N@#1 known {
- \psGetNodeCenter{#1} 2 dict begin
- /str 10 string def /tmpar [(Node #1: ) <28> () (, ) () <29>] def
- tmpar 4 #1.y str cvs put /str 10 string def tmpar 2 #1.x str cvs put
- tmpar concatstringarray = end }
- {(Node #1: (NOT KNOWN)) = } ifelse
- end
-}}%
-\fi
+ \pstVerb{%
+ gsave tx@Dict begin %
+ tx@NodeDict /N@#1 known { % known node
+ /tmpar [(Node #1: ) <28> () (, ) () <29>] def %
+ /str 12 string def
+ STV CP T \psGetNodeCenter{#1}\space
+ tmpar 2 #1.x str cvs put
+ /str 12 string def
+ tmpar 4 #1.y str cvs put
+ tmpar concatstringarray = }%
+ {% not known
+ (Node #1: (NOT KNOWN)) = %
+ } ifelse %
+ end grestore }%
+ \ignorespaces}%
%
% Use to construct a sequence of nodes
% Eg, \pnodes{P}(0,1)(2;5)(3,4) defines nodes P0, P1, P2 with respective locations