From: Graham Knop Date: Sat, 29 Aug 2020 16:07:00 +0000 (+0200) Subject: whitespace cleanup X-Git-Tag: v1.42~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Devel.git;a=commitdiff_plain;h=ae133240923d063b2a39dcf1abdada5f917da8c5 whitespace cleanup --- diff --git a/Changes b/Changes index 1e05a02..810f565 100644 --- a/Changes +++ b/Changes @@ -44,14 +44,14 @@ This file documents the revision history for Perl extension Catalyst-Devel. - Fix tests generated for controllers generated with --mechanize to work with newer versions of Test::WWW::Mechanize::Catalyst - bump Module::Install dep to 1.02 - - Removed stderr hiding from 'make catalyst_par' to display errors + - Removed stderr hiding from 'make catalyst_par' to display errors from PAR::Packer 1.35 2011-09-05 13:05:00 - Stop requiring Starman and MooseX::Daemonize on Win32 as they're optional components in Catalyst::Runtime and won't install on Windows. - - Fix test to work on Windows. + - Fix test to work on Windows. 1.34 2011-08-16 09:02:00 - Bump required version of Catalyst to 5.9 diff --git a/lib/Catalyst/Devel.pm b/lib/Catalyst/Devel.pm index 5f2de4a..07576a3 100644 --- a/lib/Catalyst/Devel.pm +++ b/lib/Catalyst/Devel.pm @@ -21,7 +21,7 @@ Catalyst::Devel - Catalyst Development Tools The C distribution includes a variety of modules useful for the development of Catalyst applications, but not required to run them. This is intended to make it easier to deploy Catalyst apps. The -runtime parts of Catalyst are now known as C. +runtime parts of Catalyst are now known as C. C includes the L system, which autogenerates scripts and tests; L, a diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index d55319a..9785aec 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -256,7 +256,7 @@ sub mk_file { $file .= '.new'; } } - + if ( my $f = IO::File->new("> $file") ) { binmode $f; print $f $content; diff --git a/t/back_compat.t b/t/back_compat.t index f1cd584..c70fdda 100644 --- a/t/back_compat.t +++ b/t/back_compat.t @@ -13,7 +13,7 @@ my $example1 = $helper->get_file('MyTestHelper', 'example1'); chomp $example1; my $example2 = $helper->get_file('MyTestHelper', 'example2'); -chomp $example2; +chomp $example2; is $example1, 'foobar[% test_var %]'; @@ -31,7 +31,7 @@ open $fh, $fn or die $@; #seek $fh, 0, 0; # Rewind my $contents; { - local $/; + local $/; $contents = <$fh>; } is $contents, "foobartest_val\n"; diff --git a/t/render_file_contents.t b/t/render_file_contents.t index 6f041ff..9cd69bd 100644 --- a/t/render_file_contents.t +++ b/t/render_file_contents.t @@ -15,7 +15,7 @@ close $fh; ok( $helper->render_file_contents('example1', $fn, { test_var => 'test_val' }, 0677 ), - "file contents rendered" ); + "file contents rendered" ); ok -r $fn; ok -s $fn; my $perms = ( stat $fn )[2] & 07777; diff --git a/t/render_share_dir_file.t b/t/render_share_dir_file.t index 94e9371..864ea8c 100644 --- a/t/render_share_dir_file.t +++ b/t/render_share_dir_file.t @@ -11,7 +11,7 @@ use File::Temp qw/tempfile/; my ($fh, $fn) = tempfile; close $fh; -ok( $helper->render_sharedir_file('script/myapp_cgi.pl.tt', $fn, { appprefix => 'fnargh' }), "sharedir file rendered" ); +ok( $helper->render_sharedir_file('script/myapp_cgi.pl.tt', $fn, { appprefix => 'fnargh' }), "sharedir file rendered" ); ok -r $fn; ok -s $fn; unlink $fn;