diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2013-09-04 22:33:30 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2018-01-11 12:47:42 -0800 |
| commit | f8022b72274f5f1177e82fa58265ecf884defb5d (patch) | |
| tree | 45f51bf338e5edd341c1a3834fe5628ebaa75b98 /FS | |
| parent | 480474201737a3ea4dc91e4ac6604a4d73300f53 (diff) | |
defined(@array) is deprecated
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/Record.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index e646b399e..851285283 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -556,8 +556,8 @@ sub qsearch { # Check for encrypted fields and decrypt them. ## only in the local copy, not the cached object no warnings 'deprecated'; # XXX silence the warning for now - if ( $conf_encryption - && eval 'defined(@FS::'. $table . '::encrypted_fields)' ) { + if ( $conf_encryption + && eval '@FS::'. $table . '::encrypted_fields' ) { foreach my $record (@return) { foreach my $field (eval '@FS::'. $table . '::encrypted_fields') { next if $field eq 'payinfo' @@ -765,8 +765,8 @@ sub _from_hashref { # Check for encrypted fields and decrypt them. ## only in the local copy, not the cached object - if ( $conf_encryption - && eval 'defined(@FS::'. $table . '::encrypted_fields)' ) { + if ( $conf_encryption + && eval '@FS::'. $table . '::encrypted_fields' ) { foreach my $record (@return) { foreach my $field (eval '@FS::'. $table . '::encrypted_fields') { next if $field eq 'payinfo' |