[LON-CAPA-cvs] cvs: loncom / lonsql

[albertel]

albertel		Mon Jul 30 19:52:06 2007 EDT

  Modified files:              
    /loncom	lonsql 
  Log:
  - support domain with - . in them
  
  
Index: loncom/lonsql
diff -u loncom/lonsql:1.82 loncom/lonsql:1.83
--- loncom/lonsql:1.82	Wed Jul 25 18:40:00 2007
+++ loncom/lonsql	Mon Jul 30 19:52:06 2007
@@ -3,7 +3,7 @@
 # The LearningOnline Network
 # lonsql - LON TCP-MySQL-Server Daemon for handling database requests.
 #
-# $Id: lonsql,v 1.82 2007/07/25 22:40:00 raeburn Exp $
+# $Id: lonsql,v 1.83 2007/07/30 23:52:06 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -372,7 +372,7 @@
 	    $run = $run+1;
 	    my $userinput = <$client>;
 	    chomp($userinput);
-            $userinput=~s/\:(\w+)$//;
+            $userinput=~s/\:($LONCAPA::domain_re)$//;
             my $searchdomain=$1;
             #
 	    my ($conserver,$query,