From: Jim Meyering <meyering@redhat.com>
Date: Sun, 29 Nov 2009 19:35:03 +0000 (+0100)
Subject: avoid a warning from perl-5.11
X-Git-Tag: v1.11.1~6^2~1
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=375912c466b28a6121d351b9ff5513133a1c7227;p=thirdparty%2Fautomake.git

avoid a warning from perl-5.11

* lib/Automake/Wrap.pm (_tab_length): Remove useless use of tr's
"/d" modifier.

Signed-off-by: Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
---

diff --git a/ChangeLog b/ChangeLog
index d45eb7fa7..560e30458 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2009-11-28  Jim Meyering  <meyering@redhat.com>
+
+	avoid a warning from perl-5.11
+	* lib/Automake/Wrap.pm (_tab_length): Remove useless use of tr's
+	"/d" modifier.
+
 2009-11-14  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 
 	Distribute the Automake bootstrap script.
diff --git a/lib/Automake/Wrap.pm b/lib/Automake/Wrap.pm
index 09a135af8..66213d1ee 100644
--- a/lib/Automake/Wrap.pm
+++ b/lib/Automake/Wrap.pm
@@ -55,7 +55,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;
 }