From: Sebastian Riedel Date: Fri, 1 Apr 2005 22:51:48 +0000 (+0000) Subject: indentation X-Git-Tag: 5.7099_04~1630 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=32e4cad6b4d17819d58bf80f4ef473231d70df7b indentation --- diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 5a9fe8a..90d158a 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -169,7 +169,7 @@ sub import { $caller->log->error(qq/Couldn't load plugin "$plugin", "$@"/); } else { - push @plugins, " $plugin"; + push @plugins, " $plugin"; no strict 'refs'; push @{"$caller\::ISA"}, $plugin; } diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index c7f87e2..a9afdb7 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -468,7 +468,7 @@ sub prepare { my @params; for my $key ( keys %{ $c->req->params } ) { my $value = $c->req->params->{$key} || ''; - push @params, " $key=$value"; + push @params, " $key=$value"; } $c->log->debug( 'Parameters are', @params ); } @@ -793,7 +793,7 @@ sub setup_components { $self->setup_actions($comp); } my @comps; - push @comps, " $_" for keys %{ $self->components }; + push @comps, " $_" for keys %{ $self->components }; $self->log->debug( 'Loaded components', @comps ) if ( @comps && $self->debug ); my $actions = $self->actions; @@ -866,7 +866,7 @@ sub _class2prefix { sub _prettify { my ( $val1, $val2, $val3 ) = @_; formline -' @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @>>>>>>>>>>>>>> ', +' @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<< @>>>>>>>>>>>>>> ', $val1, $val2, $val3; my $formatted = $^A; $^A = '';