anchor.diff:  
     if WalkShouldAbandon then
     begin
  -    Result := TaskDone;
  +    Result := tr_TaskDone;
       Exit;
     end;
   
  
positive.code:           SetActionWalkToSpot(BuildFrom.Loc);
          end
          else
            Result := TaskDone;
      1:  begin
            //Face the building
            Direction := BuildFrom.Dir;
  
negative.code:   if WalkShouldAbandon then
    begin
      fUnit.Thought := th_None;
      Result := tr_TaskDone;
      Exit;
    end;
  
  