[lazarus] Duplicate condition in HandleNeeded

[Martin Smat]

Hi,
in procedure TWinControl.HandleNeeded is this part of code:
...
if not HandleAllocated then
  begin
    if Parent = Self
    then begin
      Assert( ... );
    end
    else begin
      if (Parent <> nil) then
        Parent.HandleNeeded;
    end;
    if not HandleAllocated then  //********
      CreateHandle;
  end;
...
Is the condition marked with asterisks really needed? IMO it si useless 
because the same condition is 10 lines above and here it returns always 
true. Can it be deleted or did I anything overlook?