loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.266, 2004/11/27 17:23:08	version 1.268, 2004/12/21 20:47:55
Line 1960 sub fetch_user_file_handler {	Line 1960 sub fetch_user_file_handler {
# Note that any regular files in the way of this path are	# Note that any regular files in the way of this path are
# wiped out to deal with some earlier folly of mine.	# wiped out to deal with some earlier folly of mine.

if (!&mkpath($udir.'/')) {	if (!&mkpath($udir.'/'.$ufile)) {
&Failure($client, "unable_to_create\n", $userinput);	&Failure($client, "unable_to_create\n", $userinput);
}	}

Line 2835 sub store_handler {	Line 2835 sub store_handler {
chomp($what);	chomp($what);
my @pairs=split(/\&/,$what);	my @pairs=split(/\&/,$what);
my $hashref = &tie_user_hash($udom, $uname, $namespace,	my $hashref = &tie_user_hash($udom, $uname, $namespace,
&GDBM_WRCREAT(), "P",	&GDBM_WRCREAT(), "S",
"$rid:$what");	"$rid:$what");
if ($hashref) {	if ($hashref) {
my $now = time;	my $now = time;