X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gdk%2Fgdk.drag-and-drop.lisp;fp=gdk%2Fgdk.drag-and-drop.lisp;h=5c3d6022df48e78726db6fda8074d048d7471806;hb=00346cf6cc21a7a1daa85c3c4bfcac0d86d023b2;hp=8ddef98fcbd444057a099fa8b390f97af0f59064;hpb=44b7d0157ee74ec0565821064419b90cf0ab3050;p=cl-gtk2.git

diff --git a/gdk/gdk.drag-and-drop.lisp b/gdk/gdk.drag-and-drop.lisp
index 8ddef98..5c3d602 100644
--- a/gdk/gdk.drag-and-drop.lisp
+++ b/gdk/gdk.drag-and-drop.lisp
@@ -11,6 +11,7 @@
   (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))