[GGE::Match] s/List/Array/

When I once put in 'List' there instead of 'Array', it was in the name of generality. Then Array stopped inheriting from List... :)
masak · May 27, 2010 · 7a77cf0 · 7a77cf0
1 parent e263efb
commit 7a77cf0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/GGE/Match.pm b/lib/GGE/Match.pm
@@ -63,7 +63,7 @@ class GGE::Match {
                     when GGE::Match {
                         $out ~= $elem.dump_str($name, $b1, $b2);
                     }
-                    when List {
+                    when Array {
                         for $elem.list.kv -> $i2, $e2 {
                             my $n2 = [~] $name, $b1, $i2, $b2;
                             $out ~= $e2.dump_str($n2, $b1, $b2);
@@ -83,7 +83,7 @@ class GGE::Match {
                 when GGE::Match {
                     $out ~= $elem.dump_str($name, $b1, $b2);
                 }
-                when List {
+                when Array {
                     for $elem.list.kv -> $i2, $e2 {
                         my $n2 = [~] $name, $b1, $i2, $b2;
                         $out ~= $e2.dump_str($n2, $b1, $b2);