summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Klausner <domm@cpan.org>2008-12-01 23:56:45 +0100
committerThomas Klausner <domm@cpan.org>2008-12-01 23:56:45 +0100
commit09476def18f56124e778d7625783111aeb48481a (patch)
treec88dbf6f77c51b724ab9a877403e306c0da12cea
parentMerge branch 'master' of git@git.useperl.at:PAUSE-OpenID (diff)
downloadSimple-OpenID-09476def18f56124e778d7625783111aeb48481a.tar.gz
Simple-OpenID-09476def18f56124e778d7625783111aeb48481a.tar.bz2
Simple-OpenID-09476def18f56124e778d7625783111aeb48481a.zip
added rough catch-all action for pauseids
-rw-r--r--lib/PAUSE/OpenID/Controller/Root.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/PAUSE/OpenID/Controller/Root.pm b/lib/PAUSE/OpenID/Controller/Root.pm
index 05135e5..e0575b8 100644
--- a/lib/PAUSE/OpenID/Controller/Root.pm
+++ b/lib/PAUSE/OpenID/Controller/Root.pm
@@ -108,6 +108,13 @@ sub login_failed :Local {
$c->res->body('login fail');
}
+sub pauseid : Regex('^(.*)/?$') {
+ my ( $self, $c ) = @_;
+ my $param = $c->req->captures->[0];
+ $c->log->error("user $param");
+
+}
+
=head2 end
Attempt to render a view, if needed.