Ignore:
Timestamp:
07/28/12 09:20:21 (12 years ago)
Author:
nanardon
Message:

Use a generic filter to list objects

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Aliases.pm

    r932 r1081  
    2525    my ( $self, $c ) = @_; 
    2626 
    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'); 
    5128} 
    5229 
Note: See TracChangeset for help on using the changeset viewer.