From: Vincent Pit Date: Thu, 16 Oct 2008 17:46:47 +0000 (+0200) Subject: Make test descriptions shorter X-Git-Tag: v0.07_03~1 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=b92e3c9567e42b06df65b6d857bb647fe1bee651;p=perl%2Fmodules%2Findirect.git Make test descriptions shorter --- diff --git a/t/10-good.t b/t/10-good.t index d6b4a6a..708397f 100644 --- a/t/10-good.t +++ b/t/10-good.t @@ -19,6 +19,7 @@ sub meh; local $/ = "####\n"; while () { chomp; + s/\s*$//; local $SIG{__WARN__} = sub { die 'warn:' . join(' ', @_) }; { use indirect; diff --git a/t/20-bad.t b/t/20-bad.t index 6c14518..6706d89 100644 --- a/t/20-bad.t +++ b/t/20-bad.t @@ -23,6 +23,7 @@ sub expect { local $/ = "####\n"; while () { chomp; + s/\s*$//; local $SIG{__WARN__} = sub { die 'warn:' . join(' ', @_) }; { use indirect; diff --git a/t/22-bad-mixed.t b/t/22-bad-mixed.t index bbc2f23..76114da 100644 --- a/t/22-bad-mixed.t +++ b/t/22-bad-mixed.t @@ -17,6 +17,7 @@ sub meh; local $/ = "####\n"; while () { chomp; + s/\s*$//; local $SIG{__WARN__} = sub { die 'warn:' . join(' ', @_) }; { use indirect;