anchor.diff:    if loadPrism then
       writeln('  <a href="',ExeName,'">',ExeName,'</a><hr/>')
     else
  -    writeln('  <a href="',ExeName,'?src=1">',ChangeFileExt(ExeName,'.pas'),'</a><hr/>');
  +    writeln('  <a href="',ExeName,'?code=1">',ChangeFileExt(ExeName,'.pas'),'</a><hr/>');
   end;
   
   // read value from web vars
  
positive.code:   // mark if there is input
    isWebInput := (WebInput <> '');
    // view source code page
    if getValue('src',WebInput) = '1' then
    begin
      ViewSource(SourcePath,loadGlyphs);
      Halt;
  
negative.code:   InputCount := 0;
    WebInput   := '';
    ExeName    := ExtractFileName(ParamStr(0));
  end.
  