--- loncom/lonnet/perl/lonuploadrep.pm 2004/07/19 20:16:40 1.3 +++ loncom/lonnet/perl/lonuploadrep.pm 2004/09/02 18:01:52 1.4 @@ -51,8 +51,8 @@ sub handler { } } } - my $response=&Apache::lonnet::getfile($r->uri,'uploadrep'); - if ($response eq 'ok') { + my $response=&Apache::lonnet::repcopy_userfile($r->uri); + if ($response eq OK) { $r->filename($filename); return OK; }