--- loncom/lonsql 2005/02/09 20:39:47 1.66 +++ loncom/lonsql 2005/11/24 20:03:49 1.69 @@ -3,7 +3,7 @@ # The LearningOnline Network # lonsql - LON TCP-MySQL-Server Daemon for handling database requests. # -# $Id: lonsql,v 1.66 2005/02/09 20:39:47 albertel Exp $ +# $Id: lonsql,v 1.69 2005/11/24 20:03:49 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -241,6 +241,7 @@ unless ($dbh = DBI->connect("DBI:mysql:l exit 1; } else { + unlink('/home/httpd/html/lon-status/mysql.txt'); $dbh->disconnect; } @@ -430,7 +431,7 @@ sub make_new_child { my $locresult = ''; my $querystr = &unescape($arg3); foreach (split/%%/,$querystr) { - if (/^(\w+)=([^=]+)$/) { + if (/^([^=]+)=([^=]+)$/) { @{$affiliates{$1}} = split/,/,$2; } } @@ -507,7 +508,7 @@ sub process_file { sub do_sql_query { my ($query,$custom,$customshow) = @_; - &logthis('doing query '.$query); +# &logthis('doing query '.$query); $custom = &unescape($custom); $customshow = &unescape($customshow); #