--- loncom/interface/lonhtmlcommon.pm 2003/06/11 14:20:29 1.23
+++ loncom/interface/lonhtmlcommon.pm 2003/06/18 15:02:20 1.24
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.23 2003/06/11 14:20:29 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.24 2003/06/18 15:02:20 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -252,6 +252,7 @@ sub get_date_from_form {
$year = $tmpyear - 1900;
}
}
+ if (($year<70) || ($year>137)) { return undef; }
if (eval(&timelocal($sec,$min,$hour,$day,$month,$year))) {
return &timelocal($sec,$min,$hour,$day,$month,$year);
} else {