diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-09-25 09:40:27 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2011-09-25 14:18:09 -0600 |
| commit | 24df30275137368738493bc4007ac4d11827b590 (patch) | |
| tree | 4e67a694ddb2da01dd67e2720778982514860a5c | |
| parent | b557e99d562a750f82b817a05ee35e4e69a9377c (diff) | |
| download | perl-24df30275137368738493bc4007ac4d11827b590.tar.gz | |
podcheck.t: Don't calc value twice
| -rw-r--r-- | t/porting/podcheck.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t index 3106cbc402..ca6935077f 100644 --- 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; } |