Changeset 117


Ignore:
Timestamp:
05/17/09 02:59:54 (15 years ago)
Author:
nanardon
Message:
  • address form
Location:
LATMOS-Accounts-Web
Files:
4 edited

Legend:

Unmodified
Added
Removed

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

    r112 r117  
    3434    $c->stash->{username} = $username; 
    3535    $c->stash->{user} = $base->get_object('user', $username); 
     36    $c->stash->{form} = $subform || ''; 
    3637 
    3738    if ($c->stash->{user}) { 
    38         $c->model('AttrForms', $subform || 'user_main', $c->stash->{user})->set_attrs; 
     39        $c->model('AttrForms', 'user' . $c->stash->{form}, $c->stash->{user})->set_attrs; 
    3940    } 
    4041 

  • LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model/AttrForms.pm

    r116 r117  
    2020    gidNumber => 'GID', 
    2121    sn => 'Nom', 
    22     givenName => 'Prenom', 
     22    givenName => 'Prénom', 
    2323    homeDirectory => 'Home', 
    2424    loginShell => 'Shell', 
     25    physicalDeliveryOfficeName => 'Bureau', 
     26    telephoneNumber => 'Téléphone', 
     27    otherTelephone => 'Téléphone (autre)', 
    2528}; 
    2629 
    2730my $forms = { 
    28     user_main => { 
     31    user => { 
     32        name => 'SystÚme', 
    2933        acl => 'admin', 
    3034        attrs => [ qw( 
    3135            sn givenName uid uidNumber gidNumber gecos homeDirectory loginShell 
     36            mail 
    3237        ) ], 
    33     } 
     38    }, 
     39    useraddress => { 
     40        name => 'Adresse', 
     41        attrs => [ qw( 
     42            telephoneNumber 
     43            otherTelephone 
     44            physicalDeliveryOfficeName 
     45        ) ], 
     46    }, 
    3447}; 
    3548 
    3649sub escape { 
    3750    my ($self, $text) = @_; 
     51    $text ||= ''; 
    3852    for ($text) { 
    3953        s/&/&/g; 
    … …  
    5771    $self->{object} = $object or return; 
    5872    $self 
     73} 
     74 
     75sub label { 
     76    my ($self) = @_; 
     77    $forms->{$self->{form}}->{name} || '' 
    5978} 
    6079 

  • LATMOS-Accounts-Web/root/html/includes/form.tt

    r116 r117  
    55<form action="[% form_uri | html %]" method="POST"> 
    66<table border=1> 
    7 <tr><td colspan=2> 
    8     FORM NAME 
    9 </td></tr> 
     7<tr><th colspan=2> 
     8    [% form.label | html %] 
     9</th></tr> 
    1010[% END %] 
    1111<tr><td>[% form.attr_label(attr) %]</td><td>[% form.attr_field(attr) %]</td> 

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

    r116 r117  
    1515[% INCLUDE 'includes/form.tt' 
    1616    form_object = user 
    17     form_uri = c.uri_for(username) 
    18     form_name = 'user_main' %] 
     17    form_uri = c.uri_for(username, form) 
     18    form_name = 'user' _ form %] 
    1919[% END %] 
Note: See TracChangeset for help on using the changeset viewer.