diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-12-10 19:31:45 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2015-07-21 16:31:38 -0700 |
| commit | cbd5a370da7cb0e7046fb0de5e3f419c69beda0f (patch) | |
| tree | 4cca580596b9c0791b831413c1a1ae28b31894ec | |
| parent | 936160bf9d4bff3abbe8c71f9985c33d54cf3ca3 (diff) | |
quiet push on reference is experimental warning on new perl
| -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 e8f27f84c..75ddee0d7 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 } |