From b15d7e74f200e358572ec16d0d707a2a5ac31a81 Mon Sep 17 00:00:00 2001
From: Andy Grundman <agrundma@webgui-cvs>
Date: Thu, 26 Jun 2003 01:41:29 +0000
Subject: [PATCH] Fixed bug where interval fields that were set to '0'
 displayed as '1'

---
 lib/WebGUI/Form.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Form.pm b/lib/WebGUI/Form.pm
index d5aefd663..d2b5ac1c0 100644
--- a/lib/WebGUI/Form.pm
+++ b/lib/WebGUI/Form.pm
@@ -992,7 +992,7 @@ If you want to add anything special to this form element like javascript actions
 
 sub interval {
         my (%units, $output, $intervalValue, $unitsValue);
-        $intervalValue = $_[0]->{intervalValue} || 1;
+        $intervalValue = (defined $_[0]->{intervalValue}) ? $_[0]->{intervalValue} : 1;
         $unitsValue = $_[0]->{unitsValue} || "seconds";
         tie %units, 'Tie::IxHash';
 	%units = ('seconds'=>WebGUI::International::get(704),