From: Vincent Pit <vince@profvince.com>
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/?p=perl%2Fmodules%2Findirect.git;a=commitdiff_plain;h=b92e3c9567e42b06df65b6d857bb647fe1bee651

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 (<DATA>) {
   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 (<DATA>) {
   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 (<DATA>) {
   chomp;
+  s/\s*$//;
   local $SIG{__WARN__} = sub { die 'warn:' . join(' ', @_) };
   {
    use indirect;