From fc7f447c3419f90beb482b36d4f868c50cf63102 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Sun, 13 Oct 2002 20:28:37 +0000
Subject: [PATCH] Will now accept a second parameter (an epoch) to calculate
 date outputs.

---
 lib/WebGUI/Macro/D_date.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Macro/D_date.pm b/lib/WebGUI/Macro/D_date.pm
index 3dc5bacfe..05bf2278d 100644
--- a/lib/WebGUI/Macro/D_date.pm
+++ b/lib/WebGUI/Macro/D_date.pm
@@ -16,9 +16,10 @@ use WebGUI::Macro;
 
 #-------------------------------------------------------------------
 sub _replacement {
-        my (@param, $temp);
+        my (@param, $temp, $time);
         @param = WebGUI::Macro::getParams($_[0]);
-	$temp = epochToHuman(time(),$param[0]);
+	$time = $param[1] || time();
+	$temp = epochToHuman($time,$param[0]);
 	return $temp;
 }