From: Vincent Pit <vince@profvince.com>
Date: Tue, 14 Jul 2009 14:25:00 +0000 (+0200)
Subject: Simplify the warning handler in t/21-bad.t
X-Git-Tag: v0.16~8
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=0cc2d6ec622415ec5a39849d0837097c69c73eb5;p=perl%2Fmodules%2Findirect.git

Simplify the warning handler in t/21-bad.t
---

diff --git a/t/21-bad.t b/t/21-bad.t
index eea745e..63516f5 100644
--- a/t/21-bad.t
+++ b/t/21-bad.t
@@ -42,7 +42,7 @@ sub try {
 
  @warns = ();
  {
-  local $SIG{__WARN__} = sub { push @warns, join(' ', @_) };
+  local $SIG{__WARN__} = sub { push @warns, @_ };
   eval $code;
  }
 }