diff options
author | Thomas Klausner <domm@cpan.org> | 2008-12-01 23:56:45 +0100 |
---|---|---|
committer | Thomas Klausner <domm@cpan.org> | 2008-12-01 23:56:45 +0100 |
commit | 09476def18f56124e778d7625783111aeb48481a (patch) | |
tree | c88dbf6f77c51b724ab9a877403e306c0da12cea /lib/PAUSE/OpenID/Controller | |
parent | Merge branch 'master' of git@git.useperl.at:PAUSE-OpenID (diff) | |
download | Simple-OpenID-09476def18f56124e778d7625783111aeb48481a.tar.gz Simple-OpenID-09476def18f56124e778d7625783111aeb48481a.tar.bz2 Simple-OpenID-09476def18f56124e778d7625783111aeb48481a.zip |
added rough catch-all action for pauseids
Diffstat (limited to 'lib/PAUSE/OpenID/Controller')
-rw-r--r-- | lib/PAUSE/OpenID/Controller/Root.pm | 7 |
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. |