[PATCH] avoid a warning from perl-5.11

[Jim Meyering]

Hi Ralf,

Running the latest automake with perl-5.11.2,
I saw a warning about a useless /d modifier.
This fixes it:

>From 95a4deafaa2ca0c2a609b53eddb74a104f74da22 Mon Sep 17 00:00:00 2001
From: Jim Meyering <meyer...@redhat.com>
Date: Sat, 28 Nov 2009 21:11:58 +0100
Subject: [PATCH] avoid a warning from perl-5.11

* lib/Automake/Wrap.pm (_tab_length): Remove useless use of tr's
"/d" modifier.
---
 ChangeLog            |    4 ++++
 lib/Automake/Wrap.pm |    2 +-
 2 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d625b0f..e1ad223 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2009-11-28  Jim Meyering  <meyer...@redhat.com>

+       avoid a warning from perl-5.11
+       * lib/Automake/Wrap.pm (_tab_length): Remove useless use of tr's
+       "/d" modifier.
+
        do not put world-writable directories in distribution tarballs
        * lib/am/distdir.am (distdir): Do not make all directories
        group- or world-writable.  Instead, use 755.
diff --git a/lib/Automake/Wrap.pm b/lib/Automake/Wrap.pm
index ad1d81e..59b3e5a 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;
 }

--
1.6.6.rc0.308.g2d025