--- loncom/interface/loncommon.pm 2003/12/26 16:27:20 1.163 +++ loncom/interface/loncommon.pm 2003/12/26 21:17:37 1.164 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.163 2003/12/26 16:27:20 www Exp $ +# $Id: loncommon.pm,v 1.164 2003/12/26 21:17:37 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1927,21 +1927,6 @@ sub maketime { $th{'day'},$th{'month'}-1,$th{'year'}-1900,0,0,$th{'dlsav'})); } - -######################################### -# -# Retro-fixing of un-backward-compatible time format - -sub unsqltime { - my $timestamp=shift; - if ($timestamp=~/^(\d+)\-(\d+)\-(\d+)\s+(\d+)\:(\d+)\:(\d+)$/) { - $timestamp=&maketime( - 'year'=>$1,'month'=>$2,'day'=>$3, - 'hours'=>$4,'minutes'=>$5,'seconds'=>$6); - } - return $timestamp; -} - ######################################### sub findallcourses {