X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c027abe65b5e9012770e2bec5edbae1930fd9917..1d04c0b59989cd87343dc45fe29c1924fabfacc1:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 11f88ad5a..86f643378 100644
--- 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();
     }