diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-11-10 11:18:06 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-11-18 11:08:58 +0100 |
| commit | 9e241592f0b49731f51cf488e02c09dc84753e5d (patch) | |
| tree | 6f61837e303bd4d8988c08054d72fbd2d3846333 /Porting/pod_rules.pl | |
| parent | bcfe7366a024445f7575d1c34add01b8f02b72b3 (diff) | |
| download | perl-9e241592f0b49731f51cf488e02c09dc84753e5d.tar.gz | |
Porting/pod_rules.pl should not warn about files that it is rebuilding.
Previously it would generate warnings about inconsistencies in files, even if
it was about to rewrite the file to be consistent.
Diffstat (limited to 'Porting/pod_rules.pl')
| -rw-r--r-- | Porting/pod_rules.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Porting/pod_rules.pl b/Porting/pod_rules.pl index 35e26c9642..8be1468967 100644 --- a/Porting/pod_rules.pl +++ b/Porting/pod_rules.pl @@ -62,7 +62,10 @@ if ($Verbose) { print "I will be building $_\n" foreach keys %Build; } -my $state = get_pod_metadata(!$Test); +# For testing, generated files must be present and we're rebuilding nothing. +# For normal rebuilding, generated files may not be present, and we mute +# warnings about inconsistencies in any file we're about to rebuild. +my $state = get_pod_metadata($Test ? () : (1, values %Build)); my $test = 1; if ($Test) { |