Bug 158651 - currenttime should use time2str. Patch by burnus@gmx.de; 2xr=gerv.

4 files changed, 5 insertions, 3 deletions

diff --git a/buglist.cgi b/buglist.cgi
index 7863dda3e..123e3d4b3 100755
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -1539,7 +1539,7 @@ if ($::FORM{'debug'}) {
 $vars->{'splitheader'} = $::COOKIE{'SPLITHEADER'} ? 1 : 0;
 
 $vars->{'quip'} = GetQuip();
-$vars->{'currenttime'} = time2str("%a %b %e %T %Z %Y", time());
+$vars->{'currenttime'} = time();
 
 # The following variables are used when the user is making changes to multiple bugs.
 if ($dotweak) {
diff --git a/globals.pl b/globals.pl
index 19be37b81..d20b892a6 100644
--- a/globals.pl
+++ b/globals.pl
@@ -1757,6 +1757,9 @@ $::vars =
     # Function for retrieving global parameters.
     'Param' => \&Param ,
 
+    # Function to create date strings
+    'time2str' = \&time2str;
+
     # Function for processing global parameters that contain references
     # to other global parameters.
     'PerformSubsts' => \&PerformSubsts ,
diff --git a/long_list.cgi b/long_list.cgi
index a828b8711..33975f5b1 100755
--- a/long_list.cgi
+++ b/long_list.cgi
@@ -99,7 +99,6 @@ $vars->{'bugs'} = \@bugs;
 $vars->{'use_keywords'} = 1 if (@::legal_keywords);
 
 $vars->{'quoteUrls'} = \&quoteUrls;
-$vars->{'time2str'} = \&time2str;
 $vars->{'str2time'} = \&str2time;
 
 # Work out a sensible filename for Content-Disposition.
diff --git a/template/en/default/list/list.html.tmpl b/template/en/default/list/list.html.tmpl
index d89193290..d50d54cc5 100644
--- a/template/en/default/list/list.html.tmpl
+++ b/template/en/default/list/list.html.tmpl
@@ -38,7 +38,7 @@
 %]
 
 <div align="center">
-  <b>[% currenttime %]</b><br>
+  <b>[% time2str("%a %b %e %T %Z %Y", currenttime) %]</b><br>
 
   [% IF debug %]
     <p>[% query FILTER html %]</p>