[gnomeweb-wml] cheese: update update.pl script to substract 3600 seconds

[Daniel G. Siegel <dgsiegel src gnome org>]

commit 6bcc4ce5d3c63547449e431bfeb573e9acfdd39b
Author: daniel g. siegel <dgsiegel gnome org>
Date:   Tue Feb 1 21:18:39 2011 +0100

    cheese: update update.pl script to substract 3600 seconds
    
    as the tarball installation on ftp somehow ignores the real
    timezone and just sets GMT, we have to get rid of that

 projects.gnome.org/cheese/update.pl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/projects.gnome.org/cheese/update.pl b/projects.gnome.org/cheese/update.pl
index bbd3114..fc8cddd 100755
--- a/projects.gnome.org/cheese/update.pl
+++ b/projects.gnome.org/cheese/update.pl
@@ -82,7 +82,7 @@ for (@maindir) {
         $packages{$filename}{"sum"} = $sum;
         $mdtm = $gnomeftp->mdtm($current_file)
             or die "Cannot retrieve mtime ", $ftp->message;
-        $packages{$filename}{"epoch"} = $mdtm;
+        $packages{$filename}{"epoch"} = $mdtm - 3600;
         $packages{$filename}{"mdtm"} = time2str ("%B %o %Y", $mdtm, "GMT");
         if ($filename =~ m/.*-(\d+\.\d+.\d+)(\.[\d\.]+)?\.tar\.gz/) {
             $packages{$filename}{"release"} = "$1" . ($2 or "");
@@ -159,7 +159,7 @@ print NEWS "          <h2>News</h2>\n";
 
 for (@sorted_keys) {
     $item = $_;
-    $date = time2str ("%Y-%B", $packages{$item}{"epoch"});
+    $date = time2str ("%Y-%B", $packages{$item}{"epoch"}, "GMT");
     $release = $packages{$item}{"release"};
     print "-- release: $release\n";
     $stable = $packages{$item}{"minor"} % 2 ? "Unstable" : "Stable";