--- rat/lonratsrv.pm 2000/07/08 11:23:36 1.4 +++ rat/lonratsrv.pm 2000/07/28 21:36:12 1.6 @@ -6,7 +6,7 @@ # # 05/29/00,05/30 Gerd Kortemeyer) # 7/1 Gerd Kortemeyer) -# 7/1,7/3,7/4,7/7,7/8 Gerd Kortemeyer +# 7/1,7/3,7/4,7/7,7/8,7/10,7/26 Gerd Kortemeyer package Apache::lonratsrv; @@ -136,11 +136,11 @@ sub loadmap { } } $outstr.='<:>'.$token->[2]->{'from'}. - '<:>'.$token->[2]->{'to'}; + ':'.$token->[2]->{'to'}; if ($token->[2]->{'condition'}) { - $outstr.='<:>'.$token->[2]->{'condition'}; + $outstr.=':'.$token->[2]->{'condition'}; } else { - $outstr.='<:>0'; + $outstr.=':0'; } } elsif ($graphmode) { # --------------------------------------------- All other tags (graphical only) @@ -271,15 +271,17 @@ sub handler { my $fn=$r->filename; my $errtext=''; my $outtext=''; + my $onload=''; if ($mode ne 'loadonly') { $errtext=&savemap($fn,$errtext); + $onload='onLoad="parent.code.srvloaded();"'; } ($outtext,$errtext)=&loadmap($fn,$errtext); $r->print(< - +