X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/90815a31b45ced8f49c31502cff1c8155e692a7a..e43c500e32c61ef667d4e6a57e7315232fd705c2:/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();
     }