Changeset 167 for LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model
- Timestamp:
- 05/23/09 07:01:57 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model/AttrForms.pm
r165 r167 38 38 st => [ 'Ãtat (US)' ], 39 39 sutype => [ 'Structure admin.', 'select-N:sutype' ], 40 exported => [ undef, 'checkbox' ], 40 41 }; 41 42 … … 73 74 title 74 75 expire 76 exported 75 77 ) ], 76 78 }, … … 95 97 attrs => [ qw( 96 98 gidNumber description 97 sutype 99 sutype exported 98 100 ) ], 99 101 }, … … 202 204 return $html; 203 205 }; 206 /^checkbox$/ and do { 207 return sprintf('<input type="checkbox" name="%s"%s>', 208 $attr, 209 $self->attr_raw_value($attr) ? ' checked="yes"' : '' 210 ); 211 }; 204 212 /^select(-\w+)?:([^:]+)(?::(.*))?$/ and do { 205 213 my $options = $1 || '';
Note: See TracChangeset
for help on using the changeset viewer.