L.select_tag muss auch ohne .as_list vmethod mit 1-Element Listen kalr kommen

behebt #2376

diff --git a/SL/Presenter/Tag.pm b/SL/Presenter/Tag.pm
index 43591e5..924ab8b 100644 (file)
--- a/SL/Presenter/Tag.pm
+++ b/SL/Presenter/Tag.pm
@@ -146,6 +146,10 @@ sub select_tag {
   my $list_to_code = sub {
     my ($sub_collection) = @_;
 
+    if ('ARRAY' ne ref $sub_collection) {
+      $sub_collection = [ $sub_collection ];
+    }
+
     my @options;
     foreach my $entry ( @{ $sub_collection } ) {
       my $value;