X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flog4perl.t;fp=t%2Flog4perl.t;h=40e748b0f82fa9a719211ef65b9851168290b90c;hb=6ae293d71e67272c06271aa5a122dc018a835da7;hp=d3682a720cd123912a5dae2c466296b9f9415cb9;hpb=1ed6e521b353e90f8543b9f42a23990618c2e5d3;p=p5sagit%2FLog-Contextual.git

diff --git a/t/log4perl.t b/t/log4perl.t
index d3682a7..40e748b 100644
--- a/t/log4perl.t
+++ b/t/log4perl.t
@@ -3,12 +3,13 @@ use warnings;
 
 use Test::More;
 
-if (eval <<'EOE'
+if (
+   eval <<'EOE'
 require Log::Log4perl;
 die if $Log::Log4perl::VERSION < 1.29;
 1
 EOE
-) {
+  ) {
    plan tests => 2;
 } else {
    plan skip_all => 'Log::Log4perl 1.29 not installed'
@@ -32,7 +33,10 @@ open my $log, '<', 'myerrs.log';
 my @datas = <$log>;
 close $log;
 
-is $datas[0], "file:t/log4perl.t line:$elines[0] method:main:: - err FIRST\n", 'file and line work with Log4perl';
-is $datas[1], "file:t/log4perl.t line:$elines[1] method:main::foo - err SECOND\n", 'file and line work with Log4perl in a sub';
+is $datas[0], "file:t/log4perl.t line:$elines[0] method:main:: - err FIRST\n",
+  'file and line work with Log4perl';
+is $datas[1],
+  "file:t/log4perl.t line:$elines[1] method:main::foo - err SECOND\n",
+  'file and line work with Log4perl in a sub';
 
 unlink 'myerrs.log';