Diff for /rat/lonratsrv.pm between versions 1.25 and 1.26

version 1.25, 2004/02/11 00:10:01 version 1.26, 2004/03/29 19:44:41
Line 293  sub savemap { Line 293  sub savemap {
            }             }
         }          }
         $outstr.="</map>\n";          $outstr.="</map>\n";
  if ($fn=~/^\/*uploaded\/(\w+)\/(\w+)\//) {   if ($fn=~/^\/*uploaded\/(\w+)\/(\w+)\/(.*)$/) {
     $ENV{'form.output'}=$outstr;      $ENV{'form.output'}=$outstr;
             my $home=&Apache::lonnet::homeserver($2,$1);              my $home=&Apache::lonnet::homeserver($2,$1);
             my $result=&Apache::lonnet::finishuserfileupload($2,$1,$home,              my $result=&Apache::lonnet::finishuserfileupload($2,$1,$home,
        'output',(split(/\//,$fn))[-1]);   'output',$3);
     if ($result != m|^/uploaded/|) {      if ($result != m|^/uploaded/|) {
  $errtext.='Map not saved: A network error occured when trying to save the map. ';   $errtext.='Map not saved: A network error occured when trying to save the map. ';
     }      }

Removed from v.1.25  
changed lines
  Added in v.1.26


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>