anchor.diff:            SetActionStay(1, ua_Walk);
             Thought := th_None;
           end;
  -    else Result := TaskDone;
  +    else Result := tr_TaskDone;
     end;
     Inc(fPhase);
   
  
positive.code:   if WalkShouldAbandon then
    begin
      fUnit.Thought := th_None;
      Result := TaskDone;
      Exit;
    end;
  
  
negative.code:             SetActionStay(1, ua_Walk);
            end;
        else
            Result := tr_TaskDone;
      end;
    inc(fPhase);
  
  