From: Dave Rolsky Date: Sat, 22 Jan 2011 16:24:40 +0000 (-0600) Subject: Tidy all code X-Git-Tag: 0.01~30 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalystX-Routes.git;a=commitdiff_plain;h=05ac8ec7274add3bc1c132709707d20ee2de9238 Tidy all code --- diff --git a/lib/CatalystX/Routes.pm b/lib/CatalystX/Routes.pm index add044b..008b087 100644 --- a/lib/CatalystX/Routes.pm +++ b/lib/CatalystX/Routes.pm @@ -12,8 +12,8 @@ use Scalar::Util qw( blessed ); use Moose::Exporter; Moose::Exporter->setup_import_methods( - with_meta => [qw( get get_html post put del )], - as_is => [qw( chained args capture_args path_part action )], + with_meta => [qw( get get_html post put del )], + as_is => [qw( chained args capture_args path_part action )], class_metaroles => { class => ['CatalystX::Routes::Role::Class'], }, @@ -99,7 +99,8 @@ sub _process_args { unless ( $p{PathPart} ) { my $part = $path; unless ( $part =~ s{^/}{} ) { - $part = $meta->name()->action_namespace('FakeConfig') . q{/} . $part; + $part = join q{/}, + $meta->name()->action_namespace('FakeConfig'), . $part; } $p{PathPart} = [$part]; @@ -150,6 +151,7 @@ sub _STRINGLIKE0 ($) { } { + # This is a nasty hack around some weird back compat code in # Catalyst::Controller->action_namespace package FakeConfig;