anchor.diff:  
     // Now that we have successfully loaded the new help file(s)
     // close the existing one.
  -  CloseFile;
  +  if not OpenAdditionalFile then
  +    CloseFile;
   
     AssignList(tmpHelpFiles, CurrentOpenFiles );
   
  
positive.code:     DisplayedIndex: TStringList; // duplicate of index listbox, for fast case insensitive searching
      CurrentTopic: TTopic; // so we can get easy access to current topic viewed
      CurrentHistoryIndex: integer;
  
      procedure   btnBackHistClick(Sender: TObject);
      procedure   btnFwdHistClick(Sender: TObject);
  
negative.code:   DisplayedIndex := TStringList.Create;
    CurrentHistoryIndex := -1;
    FHistorySelection := False;
    OpenAdditionalFile := False;
    { TODO -oGraeme : Make Debug a menu option }
    Debug := False;
  
  