Return to lond CVS log | Up to [LON-CAPA] / loncom |
version 1.351, 2006/11/27 22:51:14 | version 1.352, 2006/11/27 23:10:27 |
---|---|
Line 3054 sub restore_handler { | Line 3054 sub restore_handler { |
my $userinput = "$cmd:$tail"; # Only used for logging purposes. | my $userinput = "$cmd:$tail"; # Only used for logging purposes. |
my ($udom,$uname,$namespace,$rid) = split(/:/,$tail); | my ($udom,$uname,$namespace,$rid) = split(/:/,$tail); |
$namespace = &LONCAPA::clean_username($namespace); | |
$namespace=~s/\//\_/g; | $namespace=~s/\//\_/g; |
$namespace = &LONCAPA::clean_username($namespace); | |
chomp($rid); | chomp($rid); |
my $qresult=''; | my $qresult=''; |