- Timestamp:
- 07/28/12 09:20:21 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Aliases.pm
r932 r1081 25 25 my ( $self, $c ) = @_; 26 26 27 my $db = $c->model('Accounts')->db; 28 my @al = $c->req->param('al'); 29 my @name = $c->req->param('name'); 30 my @forward = $c->req->param('forward'); 31 $c->stash->{page}{title} = "Gestion des alias"; 32 foreach my $idx (0 .. scalar(@name) - 1) { 33 34 if ($c->req->param('del' . ($idx+1))) { 35 $db->delete_object('aliases', $al[$idx]); 36 } elsif ($al[$idx] ne $name[$idx]) { 37 # delete old, create new 38 $db->delete_c_object('aliases', $al[$idx]) if($al[$idx]); 39 $db->create_c_object('aliases', $name[$idx], 40 forward => [ split(/\s*,\s*/, $forward[$idx]) ], 41 ); 42 } else { 43 my $obj = $db->get_object('aliases', $al[$idx]); 44 $obj->set_c_fields( 45 'forward' => [ split(/\s*,\s*/, $forward[$idx]) ], 46 ); 47 } 48 } 49 50 $db->commit; 27 $c->stash->{ofilter} = $c->model('AttrFilter', 'aliases'); 51 28 } 52 29
Note: See TracChangeset
for help on using the changeset viewer.