--- loncom/interface/lonmysql.pm 2009/02/01 22:03:42 1.38 +++ loncom/interface/lonmysql.pm 2019/11/20 18:02:55 1.41 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # MySQL utility functions # -# $Id: lonmysql.pm,v 1.38 2009/02/01 22:03:42 lueken Exp $ +# $Id: lonmysql.pm,v 1.41 2019/11/20 18:02:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -817,7 +817,7 @@ sub build_table_creation_request { unless($table_des->{'permanent'} eq 'yes') { $request.="COMMENT = 'temporary' "; } - $request .= "TYPE=MYISAM"; + $request .= "ENGINE=MYISAM"; return $request,$table_id; } @@ -1259,6 +1259,7 @@ Fixes a table name so that it will work sub fix_table_name { my ($name) = @_; $name =~ s/^(\d+[eE]\d+)/_$1/; + $name =~ s/\W//g; return $name; } @@ -1287,7 +1288,7 @@ 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); + 'hours'=>$4,'minutes'=>$5,'seconds'=>$6,'dlsav'=>-1); } return $timestamp; }