anchor.diff:    wg: TfpgWidget;
   begin
     {$IFDEF DNDDEBUG}
  -  writeln('XdndLeave event received!');
  +  writeln('TfpgX11Application.HandleDNDleave');
     {$ENDIF}
     if FLastDropTarget <> 0 then { 0 would be first time in, so there is no last window }
     begin
  
positive.code:           { Handle XDND data }
            if ev.xselection._property = XdndSelection then
            begin
              HandleDNDSelection(ev);
            end
            else  { Handle X Selections - clipboard data }
  
negative.code:         begin
            if ev.xselectionrequest.selection = XdndSelection then
            begin
              {$IFDEF DNDDEBUG}
              writeln('found a XdndSelection request');
              {$ENDIF}
              if Assigned(Drag) then
                Drag.HandleSelectionRequest(ev);
            end
            else
            begin
              {$IFDEF DEBUG}
              writeln('found a clipboard selection request');
              {$ENDIF}
              ProcessSelectionRequest(ev);
            end;
          end;
  