Ignore:
Timestamp:
02/23/12 13:02:26 (12 years ago)
Author:
nanardon
Message:
  • move attributes label to config files
File:
1 edited

Legend:

Unmodified
Added
Removed
  • LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model/AttrForms.pm

    r898 r899  
    1515 
    1616=cut 
    17  
    18 my $attrs = { 
    19     uid => [ 'Login' ], 
    20     uidNumber => [ 'UID' ], 
    21     gidNumber => [ 'GID' ], 
    22     manager => [ 'Responsable' ], 
    23     managedBy => [ 'Responsable' ], 
    24     sn => [ 'Nom' ], 
    25     givenName => [ 'Prénom' ], 
    26     homeDirectory => [ 'Home' ], 
    27     loginShell => [ 'Shell' ], 
    28     physicalDeliveryOfficeName => [ 'Bureau' ], 
    29     telephoneNumber => [ 'Téléphone' ], 
    30     otherTelephone => [ 'Téléphone (autre)' ], 
    31     company => [ 'Société' ], 
    32     l => [ 'Ville' ], 
    33     postalCode => [ 'Code postal' ], 
    34     postOfficeBox => [ 'BP' ], 
    35     department => [ 'Département' ], 
    36     streetAddress => [ 'Rue' ], 
    37     title => [ 'Fonction' ], 
    38     expire => [ 'Expire le' ], 
    39     st => [ 'État (US)' ], 
    40     sutype => [ 'Structure admin.' ], 
    41     exported => [ 'Propagé' ], 
    42     unexported => [ 'Caché' ], 
    43     locked => [ 'Vérouillé' ], 
    44     isMainAddress => [ 'Adresse principale' ], 
    45     site => [ 'Site' ], 
    46     co => [ 'Pays' ], 
    47     mail => [ 'Mail' ], 
    48     grade => [ 'Grade' ], 
    49     facsimileTelephoneNumber => [ 'Fax' ], 
    50     nickname => [ 'Nick' ], 
    51     cn => [ 'Nom' ], 
    52     initials => [ 'Initiales' ], 
    53     create => [ 'Créé le' ], 
    54     date => [ 'Modifié le' ], 
    55     college => [ 'College' ], 
    56     contratType => [ 'Type de contrat' ], 
    57     managerContact => [ 'Contact' ], 
    58     owner => [ 'Propriétaire' ], 
    59     description => [ 'Description' ], 
    60     name => [ 'Nom' ], 
    61     net => [ "Réseau" ], 
    62     macaddr => [ "Adresse Ethernet" ], 
    63     noDynamic => [ "Pas d'adressage dyn." ], 
    64     cname => [ "Alias (CName)" ], 
    65     type => [ "Type" ], 
    66     netExclude => [ "Réseau exclus" ], 
    67     output => [ "Sortie" ], 
    68     template => [ "ModÚle" ], 
    69     outputD => [ "Sortie" ], 
    70     templateD => [ "ModÚle" ], 
    71     group => [ "Groupe" ], 
    72     allow_dyn => [ "DHCP dynamique" ], 
    73     ipCount => [ "Nb d'IP" ], 
    74     freeIPCount => [ "Nb d'IP libres" ], 
    75     dnsRevision => [ "Révision DNS" ], 
    76     lastUpdate => [ "DerniÚre mise à jour "], 
    77     otherName => [ "Autres noms (A)" ], 
    78     'reverse' => [ "Forcer le reverse à" ], 
    79     dynFrom => [ 'Sans Ip depuis' ], 
    80     siteNick => [ 'Acronyme' ], 
    81     serialNumber => [ 'N° de série' ], 
    82     snNative => [ 'Nom d\'origine' ], 
    83     givenNameNative => [ 'Prénom d\'origine' ], 
    84     wWWHomePage => [ 'Site Web' ], 
    85     halReference => [ 'Référence HAL' ], 
    86 }; 
    8717 
    8818my $forms = { 
     
    273203sub attr_label { 
    274204    my ($self, $attr) = @_; 
     205    my ($hint, $label) = ('', ''); 
     206    LATMOS::Accounts::Web->config->{attrs} ||= {}; 
    275207    my $htmlname = ($self->{object} ? $self->{object}->id . '_' : '') . $attr; 
    276     return sprintf('<label for="%s">%s</label>', 
     208    if (my $attr_config = LATMOS::Accounts::Web->config->{attrs}{$attr}) { 
     209        $label = $attr_config->{label} || ''; 
     210        utf8::encode($label); 
     211        $hint = $attr_config->{hint} || ''; 
     212        utf8::encode($hint); 
     213    } 
     214    return sprintf('<label %sfor="%s">%s</label>', 
     215        ($hint ? sprintf('title="%s"', $self->escape($hint)) : ''), 
    277216        $self->escape($htmlname), 
    278         $self->escape($attrs->{$attr}[0] || $attr) 
     217        $self->escape($label || $attr), 
    279218    ); 
    280219} 
     
    528467            ? $self->{object}->attribute($_) 
    529468            : $self->base->attribute($self->otype, $_)) or next; 
    530         if (($attrs->{$_}[1] || '') eq 'checkbox') { 
    531             $fields{$_} = $self->{c}->req->param("$prefix$_") ? 1 : 0; 
    532         } elsif ($attr->{multiple}) { 
     469        if ($attr->{multiple}) { 
    533470            $fields{$_} = [ grep { $_ } $self->{c}->req->param("$prefix$_") ]; 
    534471        } else { 
Note: See TracChangeset for help on using the changeset viewer.