From 7a4bbc15e2a73382bc9eaf1b168a620bbd16db97 Mon Sep 17 00:00:00 2001
From: "mkanat%bugzilla.org" <>
Date: Sun, 21 May 2006 01:10:53 +0000
Subject: Bug 337782: Change the way that whine.pl gets and formats the current
 date Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=justdave

---
 whine.pl | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

(limited to 'whine.pl')

diff --git a/whine.pl b/whine.pl
index 2fd80a3e3..7e4ec5285 100755
--- a/whine.pl
+++ b/whine.pl
@@ -111,16 +111,13 @@ if (open(NOMAIL, '<', "$datadir/nomail")) {
     }
 }
 
-# get the current date and time from the database
-$sth = $dbh->prepare('SELECT ' . $dbh->sql_date_format('NOW()', '%y,%m,%d,%a,%H,%i'));
-$sth->execute;
-my ($now_year, $now_month, $now_day, $now_weekdayname, $now_hour, $now_minute) =
-        split(',', $sth->fetchrow_array);
-$sth->finish;
-
-# As DBs have different days numbering, use day name and convert it
-# to the range 0-6
-my $now_weekday = index("SunMonTueWedThuFriSat", $now_weekdayname) / 3;
+# get the current date and time
+my ($now_sec, $now_minute, $now_hour, $now_day, $now_month, $now_year, 
+    $now_weekday) = localtime;
+# Convert year to two digits
+$now_year = sprintf("%02d", $now_year % 100);
+# Convert the month to January being "1" instead of January being "0".
+$now_month++;
 
 my @daysinmonth = qw(0 31 28 31 30 31 30 31 31 30 31 30 31);
 # Alter February in case of a leap year.  This simple way to do it only
-- 
cgit v1.2.3-24-g4f1b