X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FEngine.pm;h=012038ca4c7b858dc54a858c719b0e7b8730e267;hp=969021b5d7d5c067552dee1d7a51eb86964f1253;hb=b5c7bbe3fa0325dca62c6c0eb5dcfc7c015e3c59;hpb=d41516b29b729ba98759cc98b0ad38a47bad9aa5 diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index 969021b..012038c 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -593,7 +593,7 @@ sub execute { my ( $elapsed, @state ) = $c->benchmark( $code, $class, $c, @{ $c->req->args } ); push @{ $c->{stats} }, - _prettify( $action, '', sprintf( '%fs', $elapsed ) ); + _prettify( $action, sprintf( '%fs', $elapsed ), '' ); $c->state(@state); } else { $c->state( &$code( $class, $c, @{ $c->req->args } ) ) } @@ -864,7 +864,7 @@ sub _class2prefix { sub _prettify { my ( $val1, $val2, $val3 ) = @_; formline -' @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<< @>>>>>>>>>>>>>> ', +' @<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<< @>>>>>>>>>>>>>> ', $val1, $val2, $val3; my $formatted = $^A; $^A = '';