fix off-by-one error in my ArrayRepr.pm tightening

GMOD · Feb 7, 2012 · f8cc194 · f8cc194
1 parent 2e6d59c
commit f8cc194
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/ArrayRepr.pm b/lib/ArrayRepr.pm
@@ -93,7 +93,7 @@ sub new {
     # fields is an array of (map from attribute name to attribute index)
     my @fields;
     for my $attributes ( map $_->{attributes}, @$classes ) {
-        my $field_index = 0;
+        my $field_index = 1;
         push @fields, { map { $_ => $field_index++ } @$attributes };
     }