Diff for /rat/lonratsrv.pm between versions 1.5 and 1.6

version 1.5, 2000/07/12 23:55:33 version 1.6, 2000/07/28 21:36:12
Line 6 Line 6
 #  #
 # 05/29/00,05/30 Gerd Kortemeyer)  # 05/29/00,05/30 Gerd Kortemeyer)
 # 7/1 Gerd Kortemeyer)  # 7/1 Gerd Kortemeyer)
 # 7/1,7/3,7/4,7/7,7/8,7/10 Gerd Kortemeyer  # 7/1,7/3,7/4,7/7,7/8,7/10,7/26 Gerd Kortemeyer
   
 package Apache::lonratsrv;  package Apache::lonratsrv;
   
Line 271  sub handler { Line 271  sub handler {
   my $fn=$r->filename;    my $fn=$r->filename;
   my $errtext='';    my $errtext='';
   my $outtext='';    my $outtext='';
     my $onload='';
   
   if ($mode ne 'loadonly') {    if ($mode ne 'loadonly') {
      $errtext=&savemap($fn,$errtext);       $errtext=&savemap($fn,$errtext);
        $onload='onLoad="parent.code.srvloaded();"';
   }    }
   ($outtext,$errtext)=&loadmap($fn,$errtext);    ($outtext,$errtext)=&loadmap($fn,$errtext);
   
   $r->print(<<ENDDOCUMENT);    $r->print(<<ENDDOCUMENT);
 <html>  <html>
 <body bgcolor="#FFFFFF">  <body bgcolor="#FFFFFF" $onload>
 <form name=storage method=post action="$url">  <form name=storage method=post action="$url">
 <input type=hidden name=output value="$outtext">  <input type=hidden name=output value="$outtext">
 </form>  </form>

Removed from v.1.5  
changed lines
  Added in v.1.6


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