diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2013-09-04 22:27:40 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2013-09-04 22:27:40 -0700 |
| commit | 9da190548d79840cbf04c1e2b65dff386ceb2963 (patch) | |
| tree | 4e1b687f02777bc69748e00a311229b5662ca812 /rt/lib/RT/Config.pm | |
| parent | 4c95e6a5b3afd7f00c33e3a4802da8fd59d80541 (diff) | |
from rt branch perl-5.18-compat, http://www.gossamer-threads.com/lists/rt/commit/117511
Diffstat (limited to 'rt/lib/RT/Config.pm')
| -rw-r--r-- | rt/lib/RT/Config.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rt/lib/RT/Config.pm b/rt/lib/RT/Config.pm index 0c04b9191..ee426bfa8 100644 --- a/rt/lib/RT/Config.pm +++ b/rt/lib/RT/Config.pm @@ -1231,6 +1231,7 @@ sub SetFromConfig { $ref_type = 'SCALAR' if $ref_type eq 'REF'; my $entry_ref = *{$entry}{ $ref_type }; + next if ref $entry_ref && ref $entry_ref ne ref $ref; next unless $entry_ref; # if references are equal then we've found |