summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Klausner <domm@cpan.org>2008-12-01 23:27:49 +0100
committerThomas Klausner <domm@cpan.org>2008-12-01 23:27:49 +0100
commit1f03bd52e91dc1744068778d0d9656577753ef0e (patch)
tree81b030a7279795fd11bf06e328a08d1628bdd1aa
parentcorrected memcached config (diff)
downloadSimple-OpenID-1f03bd52e91dc1744068778d0d9656577753ef0e.tar.gz
Simple-OpenID-1f03bd52e91dc1744068778d0d9656577753ef0e.tar.bz2
Simple-OpenID-1f03bd52e91dc1744068778d0d9656577753ef0e.zip
store pauseid in session after successfull login
-rw-r--r--lib/PAUSE/OpenID/Controller/Root.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/PAUSE/OpenID/Controller/Root.pm b/lib/PAUSE/OpenID/Controller/Root.pm
index 566a0a1..12bcac6 100644
--- a/lib/PAUSE/OpenID/Controller/Root.pm
+++ b/lib/PAUSE/OpenID/Controller/Root.pm
@@ -76,6 +76,7 @@ sub login :Local {
if ($res->code == 200) {
$c->log->info('login pass');
+ $c->session->{pauseid} = $username;
$c->res->redirect($c->uri_for('/login_pass'));
}
else {
@@ -86,7 +87,7 @@ sub login :Local {
sub login_pass :Local {
my ( $self, $c ) = @_;
-
+
$c->res->content_type('text/plain');
$c->res->body('login pass');
}