Revision 5cdf5329
Von Hans Peter Schlaepfer vor mehr als 5 Jahren hinzugefügt
| SL/Presenter/Tag.pm | ||
|---|---|---|
| 239 | 239 |
|
| 240 | 240 |
_set_id_attribute(\%attributes, $attributes{name}) if $attributes{name};
|
| 241 | 241 |
$attributes{type} ||= 'button';
|
| 242 |
$attributes{tag} ||= 'input';
|
|
| 242 | 243 |
|
| 243 | 244 |
$onclick = 'if (!confirm("'. _J(delete($attributes{confirm})) .'")) return false; ' . $onclick if $attributes{confirm};
|
| 244 | 245 |
|
| 245 |
html_tag('input', undef, %attributes, value => $value, onclick => $onclick);
|
|
| 246 |
if ( $attributes{tag} == 'input' ) {
|
|
| 247 |
html_tag('input', undef, %attributes, value => $value, onclick => $onclick);
|
|
| 248 |
} |
|
| 249 |
elsif ( $attributes{tag} == 'button' ) {
|
|
| 250 |
html_tag('button', undef, %attributes, value => $value, onclick => $onclick);
|
|
| 251 |
} |
|
| 246 | 252 |
} |
| 247 | 253 |
|
| 248 | 254 |
sub submit_tag {
|
Auch abrufbar als: Unified diff
Neues kivitendo Design Aenderungen in SL/..