loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.227, 2004/08/10 11:38:11	version 1.228, 2004/08/10 22:55:31
Line 1812 sub remove_user_file_handler {	Line 1812 sub remove_user_file_handler {
my ($fname) = split(/:/, $tail); # Get rid of any tailing :'s lonc may have sent.	my ($fname) = split(/:/, $tail); # Get rid of any tailing :'s lonc may have sent.

my ($udom,$uname,$ufile) = ($fname =~ m\|^([^/]+)/([^/]+)/(.+)$\|);	my ($udom,$uname,$ufile) = ($fname =~ m\|^([^/]+)/([^/]+)/(.+)$\|);
&logthis("$udom - $uname - $ufile");
if ($ufile =~m\|/\.\./\|) {	if ($ufile =~m\|/\.\./\|) {
# any files paths with /../ in them refuse	# any files paths with /../ in them refuse
# to deal with	# to deal with