Commit a2724b2d authored by Benjamin Rokseth's avatar Benjamin Rokseth
Browse files

koha: C4 userenv only send session data

parent 22f5ccff
......@@ -93,7 +93,6 @@ sub Auth {
C4::Context::set_shelves_userenv( "pub", $session->get("pubshelves") );
C4::Context::set_shelves_userenv( "tot", $session->get("totshelves") );
}
warn Dumper($session);
# Should Auth return something?
return;
}
......
......@@ -121,10 +121,7 @@ sub call {
return "failed";
};
local *{C4::Auth::checkauth} = sub { $session };
local *{C4::Context::userenv} = sub {
my $auth = $session->param("auth");
return $auth->{user};
};
local *{C4::Context::userenv} = sub { $session->{data} };
# TODO override all context methods?
#local *{C4::Context::set_userenv} = sub { };
#local *{C4::Context::_new_userenv} = sub { };
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment