71 |
$c->log->debug( "site: $site_name, action: $action" ); |
$c->log->debug( "site: $site_name, action: $action" ); |
72 |
# TODO can I really change base like this? |
# TODO can I really change base like this? |
73 |
$c->stash->{base} = "/$site_name/" . $c->stash->{base} |
$c->stash->{base} = "/$site_name/" . $c->stash->{base} |
74 |
unless ($c->stash->{base} =~ m#^/\Q$site_name\E/#); |
if ($c->stash->{base} && $$c->stash->{base} !~ m#^/\Q$site_name\E/#); |
75 |
$c->internal_redirect( $action, $c->stash, @{ $c->req->args } ); |
$c->internal_redirect( $action, $c->stash, @{ $c->req->args } ); |
76 |
} else { |
} else { |
77 |
$c->log->debug( "site: $site_name" ); |
$c->log->debug( "site: $site_name" ); |