X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9c1048cc631d86456cf684d7c8db4d66e8f162c3..5324155e7bc22990d1d0a775bc64e47b867f9b4d:/SL/Template/Plugin/L.pm diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm index 95f4ce1d0..d9deef78e 100644 --- a/SL/Template/Plugin/L.pm +++ b/SL/Template/Plugin/L.pm @@ -116,7 +116,7 @@ sub radio_button_tag { my ($self, $name, %attributes) = _hashify(2, @_); _set_id_attribute(\%attributes, $name); - $attributes{value} = 1 unless defined $attributes{value}; + $attributes{value} = 1 unless exists $attributes{value}; my $label = delete $attributes{label}; if ($attributes{checked}) {