![]() ![]() | ![]() |
version 1.489, 2004/04/23 23:01:36 | version 1.490, 2004/04/29 07:18:10 |
---|---|
Line 1338 sub finishuserfileupload { | Line 1338 sub finishuserfileupload { |
} | } |
} | } |
sub removeuserfile { | |
my ($docuname,$docudom,$fname)=@_; | |
my $home=&homeserver($docuname,$docudom); | |
return &reply("removeuserfile:$docudom/$docuname/$fname",$home); | |
} | |
# ------------------------------------------------------------------------- Log | # ------------------------------------------------------------------------- Log |
sub log { | sub log { |