Revision 9ed16037
Von Sven Schöling vor fast 7 Jahren hinzugefügt
SL/Presenter/Tag.pm | ||
---|---|---|
10 | 10 |
our @EXPORT_OK = qw( |
11 | 11 |
html_tag input_tag hidden_tag javascript man_days_tag name_to_id select_tag |
12 | 12 |
checkbox_tag button_tag submit_tag ajax_submit_tag input_number_tag |
13 |
stringify_attributes restricted_html textarea_tag link date_tag |
|
13 |
stringify_attributes restricted_html textarea_tag link_tag date_tag
|
|
14 | 14 |
); |
15 | 15 |
our %EXPORT_TAGS = (ALL => \@EXPORT_OK); |
16 | 16 |
|
... | ... | |
323 | 323 |
html_tag('textarea', $content, %attributes, name => $name); |
324 | 324 |
} |
325 | 325 |
|
326 |
sub link { |
|
326 |
sub link_tag {
|
|
327 | 327 |
my ($href, $content, %params) = @_; |
328 | 328 |
|
329 | 329 |
$href ||= '#'; |
330 | 330 |
|
331 | 331 |
html_tag('a', $content, %params, href => $href); |
332 | 332 |
} |
333 |
# alias for compatibility |
|
334 |
sub link { goto &link_tag } |
|
333 | 335 |
|
334 | 336 |
sub date_tag { |
335 | 337 |
my ($name, $value, %params) = @_; |
SL/Template/Plugin/L.pm | ||
---|---|---|
78 | 78 |
sub button_tag { return _call_presenter('button_tag', @_); } |
79 | 79 |
sub submit_tag { return _call_presenter('submit_tag', @_); } |
80 | 80 |
sub ajax_submit_tag { return _call_presenter('ajax_submit_tag', @_); } |
81 |
sub link { return _call_presenter('link', @_); }
|
|
81 |
sub link { return _call_presenter('link_tag', @_); }
|
|
82 | 82 |
sub input_number_tag { return _call_presenter('input_number_tag', @_); } |
83 | 83 |
sub textarea_tag { return _call_presenter('textarea_tag', @_); } |
84 | 84 |
sub date_tag { return _call_presenter('date_tag', @_); } |
Auch abrufbar als: Unified diff
Presenter::Tag::link - umbenannt in link_tag
um Namenskonflikte mit dem link builtin zu vermeiden