Changeset 1644 for trunk/LATMOS-Accounts-Web

Timestamp:

01/19/16 17:50:51 (8 years ago)

Author:

nanardon

Message:

Fix access to remote/ url

Location:

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller

Files:

• Remote.pm (modified) (2 diffs)
• Remote/AskPwReset.pm (modified) (3 diffs)
• Root.pm (modified) (1 diff)
• Users.pm (modified) (1 diff)

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Remote.pm

@@ -17 +17 @@
 =cut
 
-sub auto {
+sub begin : Private { }
+
+sub auto : Private {
     my ( $self, $c ) = @_;
 
@@ -24 +26 @@
         $c->model('Accounts')->db->{_user} = $c->user->{username};
     }
+
+    return 1;
 }
 

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Remote/AskPwReset.pm

@@ -33 +33 @@
     my $user = $c->model('Accounts')->db->get_object('user', $username) or do {
         $c->stash->{data}{err} = 'No such user';
+        $c->log->debug($c->stash->{data}{err});
         return;
     };
@@ -38 +39 @@
     if (!$user->_get_attributes('active')) {
         $c->stash->{data}{err} = 'No such user';
+        $c->log->debug($c->stash->{data}{err});
         return;
     }
@@ -43 +45 @@
     if (!$user->SendPasswordReset($url)) {
         $c->stash->{data}{err} = 'unknown error';
+        $c->log->debug($c->stash->{data}{err});
         return;
     } else {

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Root.pm

@@ -34 +34 @@
 
     my ($locale) = split(',', $c->req->header('Accept-Language') || '');
+    $locale ||= '';
     $locale =~ s/(\s\s)/$1/;
     if (my $plocale = ($c->req->param('locale')|| $c->session->{'locale'})) {

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Users.pm

@@ -49 +49 @@
     # synchaccess do not manage connect() at time, opening a
     # backdoor then :\
-    foreach ($sync->bases) { $_->{_user} = $c->user->username }
+    foreach ($sync->bases) { $_->{_user} = undef }
 
     my $suser = $sync->get_object_ifexists('user', $username);