Merge branch 'master' of ssh://lx-office.linet-services.de/~/lx-office-erp

[kivitendo-erp.git] / bin / mozilla / kopf.pl

diff --git a/bin/mozilla/kopf.pl b/bin/mozilla/kopf.pl
index e8fa8a35a9829aa44c5280c58de9361c39d340ea..eef8b77d0919e73b3ae044a632a9b2bd2fae700c 100644 (file)
--- a/bin/mozilla/kopf.pl
+++ b/bin/mozilla/kopf.pl
@@ -1,12 +1,17 @@
 #!/usr/bin/perl
 #
 
-$| = 1;
+#$| = 1;
 
-use CGI::Carp qw(fatalsToBrowser);
+#use CGI::Carp qw(fatalsToBrowser);
 
 use strict;
 
+sub run {
+  my $session_result = shift;
+  %::myconfig = $::auth->read_user($::form->{login})  if  $::form->{login};
+  $::locale   = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode};
+
 my $form     = $main::form;
 my $locale   = $main::locale;
 
@@ -108,10 +113,11 @@ print qq|
 
 <table border="0" width="100%" background="image/bg_titel.gif" cellpadding="0" cellspacing="0">
   <tr>
-    <td  style="color:white; font-family:verdana,arial,sans-serif; font-size: 12px;"> 
+    <td  style="color:white; font-family:verdana,arial,sans-serif; font-size: 12px;">
       &nbsp;[<a href="JavaScript:top.main_window.print();" title="| . $locale->text('Hardcopy') . qq|">| . $locale->text('Print') . qq|</a>]
-      &nbsp;[<a HREF="login.pl" target="_blank" "title="| . $locale->text('Open a further Lx-Office Window or Tab') . qq|">| . $locale->text('New Win/Tab') . qq|</a>]
-      &nbsp;[<a href="Javascript:top.main_window.history.back();" title="| . $locale->text('Go one step back') . qq|">| . $locale->text('Back') . qq|</a>] 
+      &nbsp;[<a HREF="login.pl" target="_blank" title="| . $locale->text('Open a further Lx-Office Window or Tab') . qq|">| . $locale->text('New Win/Tab') . qq|</a>]
+      &nbsp;[<a href="Javascript:top.main_window.history.back();" title="| . $locale->text('Go one step back') . qq|">| . $locale->text('Back') . qq|</a>]
+      &nbsp;[<a href="Javascript:top.main_window.history.forward();" title="| . $locale->text('Go one step forward') . qq|">| . $locale->text('Fwd') . qq|</a>]
       <!-- is there a better solution for Back? Possibly with the callback variable? -->
     </td>
     <td align="right" style="vertical-align:middle; color:white; font-family:verdana,arial,sans-serif; font-size: 12px;" nowrap>|
@@ -123,4 +129,8 @@ print qq|
 </html>
 |;
 
+}
+
+1;
+
 #