From b5ee18e1b44b94933386f3606504aa53d44fbed6 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 5 May 2008 18:33:12 +0000 Subject: curve2e 1.01 (4may08) git-svn-id: svn://tug.org/texlive/trunk@7868 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/curve2e/curve2e.sty | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'Master/texmf-dist/tex') diff --git a/Master/texmf-dist/tex/latex/curve2e/curve2e.sty b/Master/texmf-dist/tex/latex/curve2e/curve2e.sty index 3602b080851..8f1bc3286f7 100644 --- a/Master/texmf-dist/tex/latex/curve2e/curve2e.sty +++ b/Master/texmf-dist/tex/latex/curve2e/curve2e.sty @@ -36,7 +36,7 @@ %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{curve2e}% - [2006/11/27 v.1.00 Extension package for pict2e] + [2008/05/04 v.1.01 Extension package for pict2e] \RequirePackage{color} \RequirePackageWithOptions{pict2e}[2004/06/01] \ifcase\pIIe@mode\relax @@ -60,13 +60,14 @@ \ifx\undefined\@tdE \newdimen\@tdE \fi \ifx\undefined\@tdF \newdimen\@tdF \fi \ifx\undefined\defaultlinewidth \newdimen\defaultlinewidth \fi +\gdef\linethickness#1{\@wholewidth#1\@halfwidth.5\@wholewidth\ignorespaces}% \newcommand\defaultlinethickness[1]{\defaultlinewidth=#1\relax \def\thicklines{\linethickness{\defaultlinewidth}}% \def\thinlines{\linethickness{.5\defaultlinewidth}}% \thinlines\ignorespaces} \def\Line(#1,#2){\pIIe@moveto\z@\z@ \pIIe@lineto{#1\unitlength}{#2\unitlength}\pIIe@strokeGraph}% -\def\LINE(#1)(#2){\polyline(#1)(#2)}% +\def\LINE(#1)(#2){\@killglue\polyline(#1)(#2)}% \def\line(#1)#2{\begingroup \@linelen #2\unitlength \ifdim\@linelen<\z@\@badlinearg\else @@ -124,7 +125,7 @@ \expandafter\put\expandafter(#1){\expandafter\Vector\expandafter(\@tempa)}% \endgroup\ignorespaces} \let\lp@r( \let\rp@r) -\def\polyline(#1){\beveljoin\GetCoord(#1)\d@mX\d@mY +\def\polyline(#1){\@killglue\beveljoin\GetCoord(#1)\d@mX\d@mY \pIIe@moveto{\d@mX\unitlength}{\d@mY\unitlength}% \@ifnextchar\lp@r{\p@lyline}{% \PackageWarning{curve2e}% -- cgit v1.2.3