From: Olof-Joachim Frahm <olof@macrolet.net>
Date: Sun, 26 Aug 2012 16:01:48 +0000 (+0200)
Subject: Fix unknown type.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=d35f95662afdacd10760f6cac5e01edf75be6b36;p=cl-gtk2.git

Fix unknown type.
---

diff --git a/gdk/gdk.objects.lisp b/gdk/gdk.objects.lisp
index b62007e..8cf8a70 100644
--- a/gdk/gdk.objects.lisp
+++ b/gdk/gdk.objects.lisp
@@ -611,7 +611,8 @@
    (:cffi visible-region drawable-visible-region (g-boxed-foreign region :return)
           "gdk_drawable_get_visible_region" nil)))
 
-(define-g-object-class "GdkWindow" gdk-window (:superclass drawable)
+(define-g-object-class "GdkWindow" gdk-window (:superclass drawable
+                                               :type-initializer "gdk_window_object_get_type")
    (#+gtk-2.18
     (cursor gdk-window-cursor "cursor"
             "GdkCursor" t t)