13 lines
317 B
Text
13 lines
317 B
Text
Avoid a warning from perl-5.11
|
|
|
|
--- lib/Automake/Wrap.pm.orig Thu May 5 11:15:13 2011
|
|
+++ lib/Automake/Wrap.pm Thu May 5 11:15:34 2011
|
|
@@ -57,7 +57,7 @@ sub tab_length($)
|
|
{
|
|
my ($txt) = @_;
|
|
my $len = length ($txt);
|
|
- $len += 7 * ($txt =~ tr/\t/\t/d);
|
|
+ $len += 7 * ($txt =~ tr/\t/\t/);
|
|
return $len;
|
|
}
|
|
|