Changeset 1469 for trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Users.pm

Timestamp:

11/05/15 09:26:13 (9 years ago)

Author:

nanardon

Message:

Add export status to user/email forms

File:

• trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Users.pm (modified) (2 diffs)

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

@@ -169 +169 @@
 
             if ($c->req->param('usermail')) {
+
+                my %expaliases = map { $_ => 1 } $c->req->param('expaliases');
+                foreach my $alias ($c->stash->{user}->get_attributes('aliases'), $c->stash->{user}->id) {
+                    my $oalias = $base->get_object('aliases', $alias) or next;
+                    if (($expaliases{ $alias } || 0) xor ($oalias->get_c_field('exported') || 0)) {
+                        $oalias->set_c_fields('unexported' => ($expaliases{ $alias } ? undef : 1)) or do {
+                            $base->rollback;
+                            last;
+                        };
+                    }
+                }
                 $c->stash->{user}->set_c_fields(
                     mail => $c->req->param('mail') || undef,
@@ -174 +185 @@
                     revaliases => $c->req->param('revaliases') || undef,
                     forward => $c->req->param('forward') || undef,
-                ) and $base->commit;
+                ) or do {
+                    $base->rollback;
+                    last;
+                };
+
+                $base->commit;
             }