anchor.diff:      fDragingObject: Boolean;     // Flag when drag object is happening
       fDragObject: TObject;        // Object to drag
       fDragHouseOffset: TKMPoint;  // Offset for house position, to let grab house with any of its points
  +
  +    fIgnoreMouseUp: Boolean;     // Ignore Mouse Up in case we have just done RightClick_Cancel
   
       fGuiHouse: TKMMapEdHouse;
       fGuiUnit: TKMMapEdUnit;
  
positive.code:   //Place a warrior, right click so you are not placing more warriors,
    //select the placed warrior.
  
    //These pages use RMB
    if fGuiTerrain.Visible(ttHeights) then Exit;
    if fGuiTerrain.Visible(ttTile) then Exit;
    if fGuiUnit.Visible then Exit;
    if fGuiHouse.Visible then Exit;
  
    fGuiTerrain.RightClickCancel;
  
  
negative.code:   end;
  
    if Button = mbRight then
      RightClick_Cancel;
  
    //So terrain brushes start on mouse down not mouse move
    UpdateCursor(X, Y, Shift);
  