Repaired syntax errors in SuperCat.pm
authorberick <berick@esilibrary.com>
Thu, 26 May 2011 19:34:07 +0000 (15:34 -0400)
committerMike Rylander <mrylander@gmail.com>
Mon, 11 Jul 2011 17:48:28 +0000 (13:48 -0400)
Signed-off-by: berick <berick@esilibrary.com>
Open-ILS/src/perlmods/lib/OpenILS/Application/SuperCat.pm

index f733760..e04e5fb 100644 (file)
@@ -922,7 +922,7 @@ sub axis_authority_browse {
     for my $f (@{$authority_browse_axis_cache{$axis}->fields}) {
         push @tags, $f->tag;
         if ($refs) {
-            push @tags, $_->tag for @{$f-sub_entries};
+            push @tags, $_->tag for @{$f->sub_entries};
         }
     }
 
@@ -1477,7 +1477,7 @@ sub axis_authority_startwith {
     for my $f (@{$authority_browse_axis_cache{$axis}->fields}) {
         push @tags, $f->tag;
         if ($refs) {
-            push @tags, $_->tag for @{$f-sub_entries};
+            push @tags, $_->tag for @{$f->sub_entries};
         }
     }