X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/40782548cf82ac1e4c0fe417113a4cb3072e9390..154fc71cd5e85487146cbee709ebcd1083a6eb52:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 1912f7560..c504f7152 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -375,13 +375,8 @@ sub header {
                         \@page { size:landscape; }
                         </style>|;
     }
-    if ($self->{fokus}) {
-      $fokus = qq|<script type="text/javascript">
-<!--
-function fokus(){document.$self->{fokus}.focus();}
-//-->
-</script>|;
-    }
+
+    my $fokus = qq|  document.$self->{fokus}.focus();| if ($self->{"fokus"});
 
     #Set Calendar
     my $jsscript = "";
@@ -415,7 +410,15 @@ function fokus(){document.$self->{fokus}.focus();}
   $charset
   $jsscript
   $ajax
-  $fokus
+
+  <script type="text/javascript">
+  <!--
+    function fokus() {
+      $fokus
+    }
+  //-->
+  </script>
+
   <meta name="robots" content="noindex,nofollow" />
   <script type="text/javascript" src="js/highlight_input.js"></script>
   <link rel="stylesheet" type="text/css" href="css/tabcontent.css" />