--- loncom/lond 2006/11/27 16:33:38 1.349 +++ loncom/lond 2006/11/27 23:10:27 1.352 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.349 2006/11/27 16:33:38 albertel Exp $ +# $Id: lond,v 1.352 2006/11/27 23:10:27 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -60,7 +60,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.349 $'; #' stupid emacs +my $VERSION='$Revision: 1.352 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -3053,9 +3053,9 @@ sub restore_handler { my ($cmd, $tail, $client) = @_; my $userinput = "$cmd:$tail"; # Only used for logging purposes. - $namespace=~s/\W//g; my ($udom,$uname,$namespace,$rid) = split(/:/,$tail); $namespace=~s/\//\_/g; + $namespace = &LONCAPA::clean_username($namespace); chomp($rid); my $qresult='';