--- loncom/interface/loncommon.pm 2004/08/26 21:42:40 1.208 +++ loncom/interface/loncommon.pm 2004/09/02 13:38:35 1.210 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.208 2004/08/26 21:42:40 matthew Exp $ +# $Id: loncommon.pm,v 1.210 2004/09/02 13:38:35 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -812,7 +812,7 @@ format. sub csv_translate { my $text = shift; $text =~ s/\"/\"\"/g; - $text =~ s/\n//g; + $text =~ s/\n/ /g; return $text; } @@ -2331,7 +2331,7 @@ sub maketime { my %th=@_; return POSIX::mktime( ($th{'seconds'},$th{'minutes'},$th{'hours'}, - $th{'day'},$th{'month'}-1,$th{'year'}-1900,0,0,$th{'dlsav'})); + $th{'day'},$th{'month'}-1,$th{'year'}-1900,0,0,-1)); } #########################################