X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=t%2F10-good.t;fp=t%2F10-good.t;h=708397f73a9cd44126c4532acfd8af1b1edd1147;hp=d6b4a6aea32dcbfed5804272d67d3edc11429cbe;hb=b92e3c9567e42b06df65b6d857bb647fe1bee651;hpb=8fc94cd143b3b33a9642be69b17389375208dbcf 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;