diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-12-10 19:31:45 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-12-10 19:31:45 -0800 |
| commit | a63883fa4d6944e534c2cfbea1b32ec907d53ffe (patch) | |
| tree | 80e976accfabeedcce6d9dfe20d937ffa5979fb9 /FS/FS/Report | |
| parent | fa0223015fe6c03491b1d0d43524e03ac5fdb899 (diff) | |
quiet push on reference is experimental warning on new perl
Diffstat (limited to 'FS/FS/Report')
| -rw-r--r-- | FS/FS/Report/FCC_477.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/Report/FCC_477.pm b/FS/FS/Report/FCC_477.pm index af45b2d..93c8dd3 100644 --- a/FS/FS/Report/FCC_477.pm +++ b/FS/FS/Report/FCC_477.pm @@ -322,7 +322,7 @@ sub report { if ( $class->can($check_method) ) { # they don't all have these my $eh = $class->$check_method( $row ); $num_errors++ if keys(%$eh); - push $error, $eh + push @$error, $eh } push @$detail, pop @$row; # this comes from the query } |