From 3a2262e03735f3b002c913ca0c630f2e942f2201 Mon Sep 17 00:00:00 2001 From: nsj Date: Wed, 27 May 1998 12:40:19 +0000 Subject: [PATCH] Minor fixes on the date format. --- data/cgi/gallery.cgi | 10 ++++++---- en/cgi/gallery.cgi | 10 ++++++---- 2 files changed, 12 insertions(+), 8 deletions(-) diff --git a/data/cgi/gallery.cgi b/data/cgi/gallery.cgi index 94b871e416..4a99bd7c0e 100755 --- a/data/cgi/gallery.cgi +++ b/data/cgi/gallery.cgi @@ -4,7 +4,7 @@ # # John Fieber # Modified for new gallery.db format by Nate Johnson -# $Id: gallery.cgi,v 1.9 1998-05-26 19:52:58 nsj Exp $ +# $Id: gallery.cgi,v 1.10 1998-05-27 12:40:19 nsj Exp $ ################################################################## $curator = "gallery@freebsd.org"; @@ -13,7 +13,7 @@ $subject = "Another gallery submission..."; require 'cgi-lib.pl'; &ReadParse; -$hsty_date = "\$Date: 1998-05-26 19:52:58 $"; +$hsty_date = "\$Date: 1998-05-27 12:40:19 $"; #$h_base = ".."; #$d_author = " require 'cgi-style.pl'; @@ -126,9 +126,11 @@ elsif ($in{'action'} eq "submit") { $category =~ tr/A-Z/a-z/; ($mo,$da,$year) = $timestamp =~ m/(\d\d?)-(\d\d?)-(\d\d\d\d)/; - $year -= $1900; + $year -= 1900; + $mo = join('','0',$mo) if ($mo =~ /^\d$/); + $da = join('','0',$da) if ($da =~ /^\d$/); $date = join("",$year,$mo,$da); - print M "$category\t$in{'organization'}\t$in{'url'}\t$in{'description'}\t$i {'contact'}\t$date\t000000\n"; + print M "$category\t$in{'organization'}\t$in{'url'}\t$in{'description'}\t$in{'contact'}\t$date\t000000\n"; close(M); } diff --git a/en/cgi/gallery.cgi b/en/cgi/gallery.cgi index 94b871e416..4a99bd7c0e 100755 --- a/en/cgi/gallery.cgi +++ b/en/cgi/gallery.cgi @@ -4,7 +4,7 @@ # # John Fieber # Modified for new gallery.db format by Nate Johnson -# $Id: gallery.cgi,v 1.9 1998-05-26 19:52:58 nsj Exp $ +# $Id: gallery.cgi,v 1.10 1998-05-27 12:40:19 nsj Exp $ ################################################################## $curator = "gallery@freebsd.org"; @@ -13,7 +13,7 @@ $subject = "Another gallery submission..."; require 'cgi-lib.pl'; &ReadParse; -$hsty_date = "\$Date: 1998-05-26 19:52:58 $"; +$hsty_date = "\$Date: 1998-05-27 12:40:19 $"; #$h_base = ".."; #$d_author = " require 'cgi-style.pl'; @@ -126,9 +126,11 @@ elsif ($in{'action'} eq "submit") { $category =~ tr/A-Z/a-z/; ($mo,$da,$year) = $timestamp =~ m/(\d\d?)-(\d\d?)-(\d\d\d\d)/; - $year -= $1900; + $year -= 1900; + $mo = join('','0',$mo) if ($mo =~ /^\d$/); + $da = join('','0',$da) if ($da =~ /^\d$/); $date = join("",$year,$mo,$da); - print M "$category\t$in{'organization'}\t$in{'url'}\t$in{'description'}\t$i {'contact'}\t$date\t000000\n"; + print M "$category\t$in{'organization'}\t$in{'url'}\t$in{'description'}\t$in{'contact'}\t$date\t000000\n"; close(M); }