From: Dmitry Kalyanov <Kalyanov.Dmitry@gmail.com>
Date: Sun, 13 Sep 2009 09:11:34 +0000 (+0400)
Subject: Add GdkImage declaration stub and documentation stub for it
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=53774c8504ad8c4009af1c38b7f22fe54b890398;p=cl-gtk2.git

Add GdkImage declaration stub and documentation stub for it
---

diff --git a/doc/gdk.objects.texi b/doc/gdk.objects.texi
index fab004d..d150835 100644
--- a/doc/gdk.objects.texi
+++ b/doc/gdk.objects.texi
@@ -3,6 +3,7 @@
 * drag-context::
 * drawable::
 * gdk-colormap::
+* gdk-image::
 * gdk-window::
 * graphics-context::
 * keymap::
@@ -83,6 +84,19 @@ Signals:
 @end itemize
 
 
+@node gdk-image
+@section gdk-image
+@Class gdk-image
+Superclass: @ref{g-object}
+
+Slots:
+@itemize
+@end itemize
+
+
+Signals:
+@itemize
+@end itemize
 
 
 @node gdk-window
diff --git a/gdk/gdk.objects.lisp b/gdk/gdk.objects.lisp
index c95d800..5881e3b 100644
--- a/gdk/gdk.objects.lisp
+++ b/gdk/gdk.objects.lisp
@@ -464,4 +464,10 @@
      (pixels pixbuf-pixels "pixels" "gpointer" t nil)))
 
 (define-g-object-class "GdkPixbufAnimation" pixbuf-animation ()
-    nil) 
\ No newline at end of file
+    nil) 
+
+(define-g-object-class "GdkImage" gdk-image
+  (:superclass g-object :export t :interfaces
+               nil :type-initializer
+               "gdk_image_get_type")
+  nil)