fancytabs (17sep12)

git-svn-id: svn://tug.org/texlive/trunk@27684 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 18 insertions, 14 deletions

diff --git a/Master/texmf-dist/tex/latex/fancytabs/fancytabs.sty b/Master/texmf-dist/tex/latex/fancytabs/fancytabs.sty
index 4e86fa18bf8..18c6439a2a5 100644
--- a/Master/texmf-dist/tex/latex/fancytabs/fancytabs.sty
+++ b/Master/texmf-dist/tex/latex/fancytabs/fancytabs.sty
@@ -22,31 +22,35 @@
 %% 
 \NeedsTeXFormat{LaTeX2e}[1999/12/01]
 \ProvidesPackage{fancytabs}
-   [2011/09/04 1.7 Fancy page border tabs with Tikz]
+   [2012/09/17 1.8 Fancy page border tabs with Tikz]
 
 \ProvidesPackage{fancytabs}
 \RequirePackage{tikz}
 \newcommand{\tab@style}{\Large\scshape}
-\newcommand{\tab@height}{4cm}
-\newcommand{\tab@width}{1cm}
+\newlength{\tab@height}
+\setlength{\tab@height}{4cm}
+\newlength{\tab@width}
+\setlength{\tab@width}{1cm}
 \newcommand{\tab@count}{6}
 \newcommand{\tab@leftcolor}{white}
 \newcommand{\tab@rightcolor}{gray!50}
-\newcommand{\tab@top}{\tab@height}
+\newlength{\tab@top}
+\setlength{\tab@top}{\the\tab@height}
 \newcommand{\tab@textvpos}{0.5}
 \newcommand{\tab@texthpos}{\tab@textvpos}
-\newcommand{\tab@gap}{0in}
+\newlength{\tab@gap}
+\setlength{\tab@gap}{0in}
 \newcommand{\tab@floor}{0}
 \newcommand{\fancytabsStyle}[1]{\renewcommand{\tab@style}{#1}}
-\newcommand{\fancytabsHeight}[1]{\renewcommand{\tab@height}{#1}}
-\newcommand{\fancytabsWidth}[1]{\renewcommand{\tab@width}{#1}}
+\newcommand{\fancytabsHeight}[1]{\setlength{\tab@height}{#1}}
+\newcommand{\fancytabsWidth}[1]{\setlength{\tab@width}{#1}}
 \newcommand{\fancytabsCount}[1]{\renewcommand{\tab@count}{#1}}
 \newcommand{\fancytabsLeftColor}[1]{\renewcommand{\tab@leftcolor}{#1}}
 \newcommand{\fancytabsRightColor}[1]{\renewcommand{\tab@rightcolor}{#1}}
-\newcommand{\fancytabsTop}[1]{\renewcommand{\tab@top}{#1}}
+\newcommand{\fancytabsTop}[1]{\setlength{\tab@top}{#1}}
 \newcommand{\fancytabsTextVPos}[1]{\renewcommand{\tab@textvpos}{#1}}
 \newcommand{\fancytabsTextHPos}[1]{\renewcommand{\tab@texthpos}{#1}}
-\newcommand{\fancytabsGap}[1]{\renewcommand{\tab@gap}{#1}}
+\newcommand{\fancytabsGap}[1]{\setlength{\tab@gap}{#1}}
 \newcommand{\fancytabsFloor}[1]{\renewcommand{\tab@floor}{#1}}
 \AtBeginDocument{\@ifpackageloaded{babel}
   {\@ifundefined{active@char;}{}{%
@@ -59,16 +63,16 @@
 }
 \newcommand{\fancytab}[2]{%
   \begin{tikzpicture}[remember picture,overlay]%
-    \node[yshift={-1*(\tab@top+\tab@height/2+
+    \node[yshift={-1*(\the\tab@top+\the\tab@height/2+
                  mod(#2-1-\tab@floor,\tab@count)*
-                 (\tab@height+\tab@gap))},
-                  xshift=-0.5*\tab@width]
+                 (\the\tab@height+\the\tab@gap))},
+                  xshift=-0.5*\the\tab@width]
       at (current page.north east) {
       \tikz\shade[shading=axis,bottom color=\tab@leftcolor,
                   top color=\tab@rightcolor,shading angle=-90]
-        (0,0) rectangle (\tab@width,\tab@height)
+        (0,0) rectangle (\the\tab@width,\the\tab@height)
            node[rotate=0]
-                  at (\tab@texthpos*\tab@width,\tab@textvpos*\tab@height)
+                  at (\tab@texthpos*\the\tab@width,\tab@textvpos*\the\tab@height)
                       {\rotatebox{90}{\tab@style#1}};%
     };%
   \end{tikzpicture}%