loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.256, 2004/09/14 12:08:54	version 1.257, 2004/09/14 20:15:22
Line 2091 sub mkdir_user_file_handler {	Line 2091 sub mkdir_user_file_handler {
if (-e $udir) {	if (-e $udir) {
my $newdir=$udir.'/userfiles/'.$ufile;	my $newdir=$udir.'/userfiles/'.$ufile;
if (!-e $newdir) {	if (!-e $newdir) {
mkdir($newdir);	my @parts=split('/',$newdir);
	my $path;
	foreach my $part (@parts) {
	$path .= '/'.$part;
	if (!-e $path) {
	&logthis("Making $path");
	mkdir($path,0770);
	}
	}
if (!-e $newdir) {	if (!-e $newdir) {
&Failure($client, "failed\n", "$cmd:$tail");	&Failure($client, "failed\n", "$cmd:$tail");
} else {	} else {