diff options
Diffstat (limited to 'lib/base.pm')
-rw-r--r-- | lib/base.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lib/base.pm b/lib/base.pm index e98d0f1e61..832b6a4a9a 100644 --- a/lib/base.pm +++ b/lib/base.pm @@ -152,10 +152,9 @@ sub inherit_fields { } } - unless( keys %$bfields ) { - foreach my $idx (1..$#{$battr}) { - $dattr->[$idx] = $battr->[$idx] & INHERITED; - } + foreach my $idx (1..$#{$battr}) { + next if defined $dattr->[$idx]; + $dattr->[$idx] = $battr->[$idx] & INHERITED; } } |