stringgstrings v1.01

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

1 files changed, 14 insertions, 8 deletions

diff --git a/Master/texmf-dist/tex/latex/stringstrings/stringstrings.sty b/Master/texmf-dist/tex/latex/stringstrings/stringstrings.sty
index 893d0ecb977..f4c09556f4a 100644
--- a/Master/texmf-dist/tex/latex/stringstrings/stringstrings.sty
+++ b/Master/texmf-dist/tex/latex/stringstrings/stringstrings.sty
@@ -21,7 +21,7 @@
 %% same distribution. (The sources need not necessarily be
 %% in the same archive or directory.)
 \ProvidesPackage{stringstrings}
-[2008/03/28 v1.00
+[2008/04/07 v1.01
  Extensive array of string manipulation routines for
  cosmetic and programming application]
 \NeedsTeXFormat{LaTeX2e}
@@ -43,6 +43,7 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 %%%%% INITIALIZATIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\catcode`\&=12
 \usepackage{ifthen}
 
 \def\@MAXSTRINGSIZE{500}
@@ -386,9 +387,9 @@
 \newcommand\substring[4][v]{\+%
   \@getstringlength{#2}{@stringsize}%
   \@decodepointer{#3}%
-  \setcounter{@fromindex}{\fromtoindex}%
+  \setcounter{@fromindex}{\@fromtoindex}%
   \@decodepointer{#4}%
-  \setcounter{@toindex}{\fromtoindex}%
+  \setcounter{@toindex}{\@fromtoindex}%
   \setcounter{@gobblesize}{\value{@stringsize}}%
   \ifthenelse{\value{@toindex} > \value{@stringsize}}%
     {\setcounter{@maxrotation}{\value{@stringsize}}}%
@@ -1405,12 +1406,12 @@
       \setcounter{@@@letterindex}{#1}%
       \@gobblearg{#2}{2}%
       \addtocounter{@@@letterindex}{-\gobbledword}%
-      \edef\fromtoindex{\value{@@@letterindex}}%
+      \edef\@fromtoindex{\value{@@@letterindex}}%
     \else
-      \edef\fromtoindex{#1}%
+      \edef\@fromtoindex{#1}%
     \fi
   \else
-    \edef\fromtoindex{#2}%
+    \edef\@fromtoindex{#2}%
   \fi
 }
 
@@ -2042,7 +2043,9 @@
               \if <#1<\else
                \if >#1>\else
                 \if |#1|\else
-                 \@rotateUndecipherable{#1}%
+                 \if &#1&\else
+                  \@rotateUndecipherable{#1}%
+                 \fi
                 \fi
                \fi
               \fi
@@ -2076,7 +2079,9 @@
               \if <#1\else
                \if >#1\else
                 \if |#1\else
-                 \@rotateUndecipherable{#1}%
+                 \if &#1\else
+                  \@rotateUndecipherable{#1}%
+                 \fi
                 \fi
                \fi
               \fi
@@ -2098,6 +2103,7 @@
   \expandafter\@gobble#1\undecipherable%
 }
 
+\catcode`\&=4
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \endinput
 %%