From 337405b5f80d044acd714d3f1a543925a032af73 Mon Sep 17 00:00:00 2001
From: Laurent Destailleur <eldy@users.sourceforge.net>
Date: Sun, 14 Feb 2010 19:13:58 +0000
Subject: [PATCH] Add info to help debug of TZ

---
 build/exe/doliwamp/php.ini.install | 5 +++--
 htdocs/admin/system/dolibarr.php   | 7 ++++++-
 2 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/build/exe/doliwamp/php.ini.install b/build/exe/doliwamp/php.ini.install
index 2a914dfce38..ad3ef6b0e1b 100644
--- a/build/exe/doliwamp/php.ini.install
+++ b/build/exe/doliwamp/php.ini.install
@@ -707,8 +707,9 @@ extension=php_zip.dll
 
 [Date]
 ; Defines the default timezone used by the date functions
-; date.timezone = UTC => You have local = greenwich.
-; Comment line to use system OS TZ.
+; date.timezone = UTC          => You have local = greenwich.
+; date.timzeone = Europe/Paris => To use TZ+1
+; See http://php.net/date.timezone
 ;date.timezone =
 
 ;date.default_latitude = 31.7667
diff --git a/htdocs/admin/system/dolibarr.php b/htdocs/admin/system/dolibarr.php
index 39b0a3d55b4..692dec39067 100644
--- a/htdocs/admin/system/dolibarr.php
+++ b/htdocs/admin/system/dolibarr.php
@@ -25,6 +25,7 @@
 
 require("./pre.inc.php");
 require_once(DOL_DOCUMENT_ROOT."/lib/memory.lib.php");
+require_once(DOL_DOCUMENT_ROOT."/lib/date.lib.php");
 
 $langs->load("admin");
 $langs->load("install");
@@ -170,7 +171,7 @@ print "<tr ".$bc[$var]."><td width=\"300\">".$langs->trans("PHPTZ")." (php.ini d
 if (function_exists('date_default_timezone_get'))
 {
 	$var=!$var;
-	print "<tr ".$bc[$var]."><td width=\"300\">=> ".$langs->trans("CurrentTimeZone")."</td><td>";
+	print "<tr ".$bc[$var]."><td width=\"300\">=> ".$langs->trans("CurrentTimeZone")."</td><td>";	// Timezone server PHP
 	print date_default_timezone_get();
 	print "</td></tr>\n";	// value defined in http://fr3.php.net/manual/en/timezones.europe.php
 }
@@ -180,6 +181,10 @@ $var=!$var;
 print "<tr ".$bc[$var]."><td width=\"300\">=> ".$langs->trans("CurrentHour")."</td><td>".dol_print_date(dol_now('tzserver'),'dayhour')."</td></tr>\n";
 $var=!$var;
 print "<tr ".$bc[$var].'><td width="300">=> dol_print_date(0,"dayhourtext")</td><td>'.dol_print_date(0,"dayhourtext")."</td>";
+$var=!$var;
+print "<tr ".$bc[$var].'><td width="300">=> dol_get_first_day(1970,1,false)</td><td>'.dol_get_first_day(1970,1,false)." &nbsp; &nbsp; (with dol_print_date() or idate() = ".dol_print_date(dol_get_first_day(1970,1,false),'dayhour').")</td>";
+$var=!$var;
+print "<tr ".$bc[$var].'><td width="300">=> dol_get_first_day(1970,1,true)</td><td>'.dol_get_first_day(1970,1,true)." &nbsp; &nbsp; (with dol_print_date() or idate() = ".dol_print_date(dol_get_first_day(1970,1,true),'dayhour').")</td>";
 # Parent company
 $var=!$var;
 print "<tr ".$bc[$var]."><td width=\"300\">".$langs->trans("CompanyTZ")."</td><td>".$langs->trans("FeatureNotYetAvailable")."</td></tr>\n";