This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
c1eb2b0
)
podcheck.t: Was always giving failure under -regen
author
Karl Williamson
<public@khwilliamson.com>
Thu, 22 Nov 2012 15:48:59 +0000
(08:48 -0700)
committer
Karl Williamson
<public@khwilliamson.com>
Thu, 22 Nov 2012 16:15:39 +0000
(09:15 -0700)
The tests added in commit
da33abaf8bbfaee9e713ac54f3355186650df952
should be skipped under -regen. No tests should be run under -regen.
t/porting/podcheck.t
patch
|
blob
|
blame
|
history
diff --git
a/t/porting/podcheck.t
b/t/porting/podcheck.t
index
4cea599
..
f7e75cb
100644
(file)
--- a/
t/porting/podcheck.t
+++ b/
t/porting/podcheck.t
@@
-1847,7
+1847,9
@@
foreach my $filename (@files) {
}
}
-if (! ok (keys %known_problems == 0, "The known problems data base includes no references to non-existent files")) {
+if (! $regen
+ && ! ok (keys %known_problems == 0, "The known problems data base includes no references to non-existent files"))
+{
note("The following files were not found: "
. join ", ", keys %known_problems);
note("They will automatically be removed from the db the next time");