[differences between cumulative patch application and perl5.004_01]

[p5sagit/p5-mst-13.2.git] / pod / perllol.pod

diff --git a/pod/perllol.pod b/pod/perllol.pod
index ac36364..1de3b1a 100644 (file)
--- a/pod/perllol.pod
+++ b/pod/perllol.pod
@@ -270,7 +270,7 @@ $x run from 4..8 and $y run from 7 to 12?  Hmm... here's the simple way:
 
     @newLoL = ();
     for ($startx = $x = 4; $x <= 8; $x++) {
-       for ($starty = $y = 7; $x <= 12; $y++) {
+       for ($starty = $y = 7; $y <= 12; $y++) {
            $newLoL[$x - $startx][$y - $starty] = $LoL[$x][$y];
        }
     }