Changeset 497


Ignore:
Timestamp:
10/05/09 14:30:15 (15 years ago)
Author:
nanardon
Message:
  • add user/mail page forms
Location:
LATMOS-Accounts-Web
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • LATMOS-Accounts-Web/latmos-accounts-web.spec.in

    r438 r497  
    2525BuildRequires: perl(Catalyst::Plugin::Prototype) 
    2626BuildRequires: perl(Catalyst::View::TT) 
     27BuildRequires: perl(LATMOS::Accounts) 
    2728 
    2829Requires: perl(Catalyst) 

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

    r467 r497  
    113113            $c->stash->{db} = $base; 
    114114            $c->stash->{template} = 'users/mail.tt'; 
    115             my %aliases; 
    116             my @faliases = $c->stash->{user}->get_attributes('aliases'); 
    117             foreach my $al (@faliases) { 
    118                 $aliases{$al} = $base->get_object('aliases', $al); 
    119                 delete($aliases{$al}) if (!$aliases{$al}); 
     115 
     116            if ($c->req->param('usermail')) { 
     117                $c->stash->{user}->set_c_fields( 
     118                    mail => $c->req->param('mail'), 
     119                    aliases => [ grep { $_ } $c->req->param('aliases') ], 
     120                    revaliases => $c->req->param('revaliases'), 
     121                    forward => $c->req->param('forward'), 
     122                ) and $base->commit; 
    120123            } 
    121             my %samealiases; 
    122             foreach my $alias (values %aliases) { 
    123                 foreach my $sameid ($alias->get_attributes('samedestination')) { 
    124                     exists($aliases{$sameid}) and next; 
    125                     $sameid eq $username and next; # skip the forward 
    126                     $samealiases{$sameid} ||= $base->get_object('aliases', 
    127                         $sameid); 
    128                 } 
    129             } 
    130             @{ $c->stash->{samealiases} } = values %samealiases; 
    131             $c->stash->{forward} = $base->get_object('aliases', $username); 
    132             $c->stash->{aliases} = [ values %aliases ]; 
     124 
    133125            last; 
    134126        }; 

  • LATMOS-Accounts-Web/root/html/users/mail.tt

    r467 r497  
    99<div id="oform"> 
    1010 
    11 <h2>EMail</h2> 
    12 [% user.get_c_field('mail') %] 
     11<form action="[% c.uri_for(user.id, 'mail') %]" method="POST"> 
     12<input type=hidden name="usermail" value=1> 
     13<table border=1> 
     14<tr><th>EMail</th> 
     15<td> 
     16<input type="text" name="mail" value="[% user.get_c_field('mail') | html %]"> 
     17</td> 
     18</tr> 
    1319 
    14 <h2>Aliases</h2> 
    15 [% FOREACH alias = aliases %] 
    16 [% alias.id | html %] (==> 
    17 [% alias.get_c_field('finalpoint').join(', ') | html %])<br> 
     20<tr> 
     21<th>Aliases</th> 
     22<td> 
     23[% FOREACH alias = user.get_c_field('aliases') %] 
     24[% oalias = c.model('Accounts').db.get_object('aliases', alias) %] 
     25<input type="text" name="aliases" value="[% alias %]"><br> 
    1826[% END %] 
     27<input type="text" name="aliases" value=""><br> 
    1928 
    2029--<br> 
    … …  
    2433<br> 
    2534[% END %] 
     35</td> 
     36</tr> 
    2637 
    27 <h2>Renvois</h2> 
    28 [% forward.get_c_field('forward') %] 
     38<tr> 
     39<th>Renvois</th> 
    2940 
    30 <h2>RevAliases</h2> 
    31 [% user.get_c_field('revaliases') | html %] 
     41<td> 
     42<input type="text" name="forward" value="[% forward.get_c_field('forward').join(',') | html %]"> 
     43</td> 
     44</tr> 
     45 
     46<tr> 
     47<th>RevAliases</th> 
     48<td> 
     49<input type="text" name="revaliases" value="[% user.get_c_field('revaliases') | html %]"> 
     50</td> 
     51</tr> 
     52<tr><td colspan=2> 
     53<input type="submit"> 
     54</td> 
     55</tr> 
     56</table> 
     57</form> 
    3258 
    3359</div> 
Note: See TracChangeset for help on using the changeset viewer.