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:
b557e99
)
podcheck.t: Don't calc value twice
author
Karl Williamson
<public@khwilliamson.com>
Sun, 25 Sep 2011 15:40:27 +0000
(09:40 -0600)
committer
Karl Williamson
<public@khwilliamson.com>
Sun, 25 Sep 2011 20:18:09 +0000
(14:18 -0600)
t/porting/podcheck.t
patch
|
blob
|
blame
|
history
diff --git
a/t/porting/podcheck.t
b/t/porting/podcheck.t
index
3106cbc
..
ca69350
100644
(file)
--- a/
t/porting/podcheck.t
+++ b/
t/porting/podcheck.t
@@
-1672,7
+1672,7
@@
foreach my $filename (@files) {
else {
$count = @{$problems{$filename}{$message}};
}
- my_safer_print($copy_fh,
canonicalize($filename)
. "\t$message\t$count\n");
+ my_safer_print($copy_fh,
$canonical
. "\t$message\t$count\n");
}
next;
}