aboutsummaryrefslogtreecommitdiffstats
path: root/perl.prov
diff options
context:
space:
mode:
Diffstat (limited to 'perl.prov')
-rwxr-xr-xperl.prov6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl.prov b/perl.prov
index 7ac8c16..1668d29 100755
--- a/perl.prov
+++ b/perl.prov
@@ -139,7 +139,11 @@ sub process_file {
if ($package eq 'main') {
undef $package;
} else {
- $require{$package}=undef;
+ # If $package already exists in the $require hash, it means
+ # the package definition is broken up over multiple blocks.
+ # In that case, don't stomp a previous $VERSION we might have
+ # found. (See BZ#214496.)
+ $require{$package} = undef unless (exists $require{$package});
}
}
}