Helferfunktion L.yes_no_tag()

Implementiert die Standard-"Ja/Nein"-Selectbox via L.select_tag(...,
L.options_for_select())

diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm
index 0b4967d..f6a3fd8 100644 (file)
--- a/SL/Template/Plugin/L.pm
+++ b/SL/Template/Plugin/L.pm
@@ -252,6 +252,14 @@ sub options_for_select {
   return $code;
 }
 
+sub yes_no_tag {
+  my ($self, $name, $value) = splice @_, 0, 3;
+  my %attributes            = _hashify(@_);
+
+  my $options               = $self->options_for_select([ [ 1, $::locale->text('Yes') ], [ 0, $::locale->text('No') ] ], default => $value ? 1 : 0);
+  return $self->select_tag($name, $options, %attributes);
+}
+
 sub javascript {
   my ($self, $data) = @_;
   return $self->html_tag('script', $data, type => 'text/javascript');
@@ -629,6 +637,13 @@ L</options_for_select> function. If C<$options_string> is an array
 reference then it will be passed to L</options_for_select>
 automatically.
 
+=item C<yes_no_tag $name, $value, %attributes>
+
+Creates a HTML 'select' tag with the two entries C<yes> and C<no> by
+calling L<select_tag> and L<options_for_select>. C<$value> determines
+which entry is selected. The C<%attributes> are passed through to
+L<select_tag>.
+
 =item C<input_tag $name, $value, %attributes>
 
 Creates a HTML 'input type=text' tag named C<$name> with the value