[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonhtmlcommon.pm

[raeburn]

raeburn		Sat Jan 23 22:23:53 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	lonhtmlcommon.pm 
  Log:
  - Bug 5795.
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.182.4.10 loncom/interface/lonhtmlcommon.pm:1.182.4.11
--- loncom/interface/lonhtmlcommon.pm:1.182.4.10	Fri Jan 22 14:24:16 2010
+++ loncom/interface/lonhtmlcommon.pm	Sat Jan 23 22:23:53 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.182.4.10 2010/01/22 14:24:16 raeburn Exp $
+# $Id: lonhtmlcommon.pm,v 1.182.4.11 2010/01/23 22:23:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -436,8 +436,8 @@
         ($tzname,$sec,$min,$hour,$mday,$month,$year) = &get_timedates($currentvalue); 
     }
     unless ($wasdefined) {
-        ($tzname,$sec,$min,$hour,$mday,$month,$year) = &get_timedates($now);
 	if (($defhour) || ($defmin) || ($defsec)) {
+            ($tzname,$sec,$min,$hour,$mday,$month,$year) = &get_timedates($now);
 	    $sec=($defsec?$defsec:0);
 	    $min=($defmin?$defmin:0);
 	    $hour=($defhour?$defhour:0);