(suggested-action gdk-drag-action)
(action gdk-drag-action)
(start-time :uint32))
+(defctype %gdk-drag-context (:struct %gdk-drag-context))
(defun %gdk-drag-context-get-protocol (context)
(foreign-slot-value (pointer context) '%gdk-drag-context 'protocol))
(context (g-object drag-context))
(time :uint32))
-(export 'gdk-drag-abord)
+(export 'gdk-drag-abort)
(defcfun gdk-drop-reply :void
(context (g-object drag-context))