X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=blobdiff_plain;f=lib%2FLaTeX%2FTikZ%2FFunctor%2FRule.pm;h=0f86be16ff5f2c865c1f964c770ee0daa8cd6fa1;hp=666fd34b9656c1bfbb5f85ddec06b9ca2850cfc6;hb=f424040eff31962e11e047917314519df3ab6a88;hpb=49f458095574464e32c53c24bea8657f452b7f25

diff --git a/lib/LaTeX/TikZ/Functor/Rule.pm b/lib/LaTeX/TikZ/Functor/Rule.pm
index 666fd34..0f86be1 100644
--- a/lib/LaTeX/TikZ/Functor/Rule.pm
+++ b/lib/LaTeX/TikZ/Functor/Rule.pm
@@ -158,7 +158,7 @@ sub insert {
    }
   }
 
-  my $shift;
+  my $shift = 0;
   for (@remove) {
    splice @$list, $_ - $shift, 1;
    ++$shift;