Merge branch 'master' of git@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 9b2e1a6..0228566 100644 (file)
--- a/bin/mozilla/kopf.pl
+++ b/bin/mozilla/kopf.pl
@@ -1,96 +1,23 @@
  #!/usr/bin/perl
-#
  
-$| = 1;
+use strict;
+use DateTime;
  
-use CGI::Carp qw(fatalsToBrowser);
-                                                                                                                
-$form->header;
-$paramstring = $ENV{"QUERY_STRING"};
-@felder = split "&", $paramstring;
-foreach (@felder) {
-       ($name, $wert) = split "=", $_;
-       $wert =~ tr/+/ /;
-       $$name = $wert;
-}
-$login="[".$login." - <a href=\"login.pl?path=" . $form->{"path"} . "&password=" . $form->{"password"} . "&action=logout\" target=\"_top\">" . $locale->text('Logout') . "</a>] ";
-my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat, $Jahr, $Wochentag, $Jahrestag, $Sommerzeit) = localtime(time);
-my $CTIME_String = localtime(time);
-$Monat+=1;
-$Jahrestag+=1;
-$Monat = $Monat < 10 ? $Monat = "0".$Monat : $Monat;
-$Monatstag = $Monatstag < 10 ? $Monatstag = "0".$Monatstag : $Monatstag;
-$Jahr+=1900;
-my @Wochentage = ("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Samstag");
-my @Monatsnamen = ("","Januar","Februar","M&auml;rz","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
-$datum=$Wochentage[$Wochentag].", der ".$Monatstag.".".$Monat.".".$Jahr." - ";
-#$zeit="<div id='Uhr'>".$Stunden.":".$Minuten.":".$Sekunden."</div>";
-$zeit="<div id='Uhr'>".$Stunden.":".$Minuten."</div>";
+sub run {
+  my $session_result = shift;
  
-print qq|
-<script type="text/javascript">
-<!--
-var clockid=new Array()
-var clockidoutside=new Array()
-var i_clock=-1
-var thistime= new Date()
-var hours= |.$Stunden.qq|;
-var minutes= |.$Minuten.qq|;
-var seconds= |.$Sekunden.qq|;
-if (eval(hours) <10) {hours="0"+hours}
-if (eval(minutes) < 10) {minutes="0"+minutes}
-if (seconds < 10) {seconds="0"+seconds}
-//var thistime = hours+":"+minutes+":"+seconds
-var thistime = hours+":"+minutes
+  %::myconfig = $::auth->read_user($::form->{login})  if $::form->{login};
+  $::locale   = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode};
  
-function writeclock() {
-       i_clock++
-       if (document.all \|\| document.getElementById \|\| document.layers) {
-               clockid[i_clock]="clock"+i_clock
-               document.write("<font family=arial size=2><span id='"+clockid[i_clock]+"' style='position:relative'>"+thistime+"</span></font>")
-       }
+  $::form->header;
+  print $::form->parse_html_template('menu/header', {
+    now        => DateTime->now,
+    show_debug => $::lx_office_conf{debug}{show_debug_menu},
+    lxdebug    => $::lxdebug,
+    is_links   => ($ENV{HTTP_USER_AGENT} =~ /links/i),
+  });
  }
  
-function clockon() {
-       thistime= new Date()
-       hours=thistime.getHours()
-       minutes=thistime.getMinutes()
-       seconds=thistime.getSeconds()
-       if (eval(hours) <10) {hours="0"+hours}
-       if (eval(minutes) < 10) {minutes="0"+minutes}
-       if (seconds < 10) {seconds="0"+seconds}
-       //thistime = hours+":"+minutes+":"+seconds
-       thistime = hours+":"+minutes
-
-       if (document.all) {
-               for (i=0;i<=clockid.length-1;i++) {
-                       var thisclock=eval(clockid[i])
-                       thisclock.innerHTML=thistime
-               }
-       }
-
-       if (document.getElementById) {
-               for (i=0;i<=clockid.length-1;i++) {
-                       document.getElementById(clockid[i]).innerHTML=thistime
-               }
-       }
-       var timer=setTimeout("clockon()",60000)
-}
-window.onload=clockon
-//-->
-</script>
-|;
-#
-print qq|
-<body bgcolor="#ffffff" text="#ffffff" link="#ffffff" vlink="#ffffff" alink="#ffffff" topmargin="0" leftmargin="0"  marginwidth="0" marginheight="0">
+1;
  
-<table border="0" width="100%" background="image/bg_titel.gif" cellpadding="0" cellspacing="0">
-       <tr>
-               <td align="right" style="vertical-align:middle; color:white; font-family:verdana,arial,sans-serif; font-size: 12px;" nowrap>|.$login.$datum.qq| <script>writeclock()</script>&nbsp;
-               </td>
-       </tr>
-</table>
-</body>
-</html>
-|;
  #