diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-02-18 00:26:44 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-02-18 00:26:44 -0600 |
commit | b815a6f9be0eb015728b3fb7e8b0ec6cfba94dfe (patch) | |
tree | 3c0541938cf94515533b77a36d8ca43f7569a1d3 /lib/Narwhal/Component/Redirect.pm | |
parent | 4875037269702e9e4195d01e2711b489c40ad0e9 (diff) | |
download | narwhal-b815a6f9be0eb015728b3fb7e8b0ec6cfba94dfe.tar.gz narwhal-b815a6f9be0eb015728b3fb7e8b0ec6cfba94dfe.zip |
again, i really wanted mapping here
Diffstat (limited to 'lib/Narwhal/Component/Redirect.pm')
-rw-r--r-- | lib/Narwhal/Component/Redirect.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Narwhal/Component/Redirect.pm b/lib/Narwhal/Component/Redirect.pm index 58a8478..06332de 100644 --- a/lib/Narwhal/Component/Redirect.pm +++ b/lib/Narwhal/Component/Redirect.pm @@ -20,7 +20,7 @@ sub temporary { sub _get_location { my $self = shift; my ($req) = @_; - my $to = $req->env->{'plack.router.match'}->route->defaults->{to}; + my $to = $req->env->{'plack.router.match'}->mapping->{to}; die "must supply a location to redirect to" unless $to; return $to; } |