X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate%2FPlugin%2FL.pm;h=0ed2a8784718ce68e202b16c17be111b1b13321c;hb=b27c05d659c377d0911e6b1bde6d4d92d6cc19e2;hp=b78ebb01543715b4ef34e87353efb1e0c7b1e09d;hpb=7328cbd6ab400a613f6c160beffbdb3abb44c8ad;p=kivitendo-erp.git diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm index b78ebb015..0ed2a8784 100644 --- a/SL/Template/Plugin/L.pm +++ b/SL/Template/Plugin/L.pm @@ -106,6 +106,7 @@ sub checkbox_tag { $attributes{id} ||= $self->name_to_id($name); $attributes{value} = 1 unless defined $attributes{value}; my $label = delete $attributes{label}; + my $checkall = delete $attributes{checkall}; if ($attributes{checked}) { $attributes{checked} = 'checked'; @@ -115,6 +116,7 @@ sub checkbox_tag { my $code = $self->html_tag('input', undef, %attributes, name => $name, type => 'checkbox'); $code .= $self->html_tag('label', $label, for => $attributes{id}) if $label; + $code .= $self->javascript(qq|\$('#$attributes{id}').checkall('$checkall');|) if $checkall; return $code; } @@ -222,7 +224,7 @@ sub options_for_select { my @elements = (); push @elements, [ undef, $options{empty_title} || '' ] if $options{with_empty}; push @elements, map [ - $value_title_sub ? $value_title_sub->($_) : ( + $value_title_sub ? @{ $value_title_sub->($_) } : ( $access->($_, 0, $value_key, $value_sub), $access->($_, 1, $title_key, $title_sub), ) @@ -578,6 +580,10 @@ If C<%attributes> contains a key C