strict Fehler in Form behoben, nach Forenbeitrag "Preisupdate schlägt fehl".

diff --git a/SL/Form.pm b/SL/Form.pm
index 11f88ad..86f6433 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -656,7 +656,7 @@ sub header {
       ? "$self->{title} - $self->{titlebar}"
       : $self->{titlebar};
     my $ajax = "";
-    foreach my $item (@ { $self->{AJAX} }) {
+    for my $item (@ { $self->{AJAX} || [] }) {
       $ajax .= $item->show_javascript();
     }