loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.349, 2006/11/27 16:33:38	version 1.352, 2006/11/27 23:10:27
Line 3053 sub restore_handler {	Line 3053 sub restore_handler {
my ($cmd, $tail, $client) = @_;	my ($cmd, $tail, $client) = @_;

my $userinput = "$cmd:$tail"; # Only used for logging purposes.	my $userinput = "$cmd:$tail"; # Only used for logging purposes.
$namespace=~s/\W//g;
my ($udom,$uname,$namespace,$rid) = split(/:/,$tail);	my ($udom,$uname,$namespace,$rid) = split(/:/,$tail);
$namespace=~s/\//\_/g;	$namespace=~s/\//\_/g;
	$namespace = &LONCAPA::clean_username($namespace);

chomp($rid);	chomp($rid);
my $qresult='';	my $qresult='';