koha: C4 userenv only send session data

koha/Deichman/Auth.pm

@@ -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;
 }

koha/Deichman/Plack/Middleware/Session.pm

@@ -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 { };