From a37c8bfc98ccf517b36092049c3b91b33e08bb8e Mon Sep 17 00:00:00 2001 From: Andrey Kutejko Date: Wed, 23 Dec 2009 00:59:04 +0200 Subject: [PATCH] gtk 2.16 compatibility downgrade --- gdk/gdk.windows.lisp | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/gdk/gdk.windows.lisp b/gdk/gdk.windows.lisp index 2dd57fd..cba0f6c 100644 --- a/gdk/gdk.windows.lisp +++ b/gdk/gdk.windows.lisp @@ -163,12 +163,14 @@ (export 'gdk-window-lower) +#| (defcfun gdk-window-restack :void (window (g-object gdk-window)) (sibling (g-object gdk-window)) (above :boolean)) (export 'gdk-window-restack) +|# (defcfun gdk-window-focus :void (window (g-object gdk-window)) @@ -483,6 +485,7 @@ ;; gint *x, ;; gint *y); +#| (defcfun gdk_window_get_root_coords :void (window (g-object gdk-window)) (x :int) @@ -494,6 +497,7 @@ (with-foreign-objects ((root-x :int) (root-y :int)) (gdk_window_get_root_coords window x y root-x root-y) (values (mem-ref root-x :int) (mem-ref root-y :int)))) +|# (defcfun gdk_window_get_pointer (g-object gdk-window) (window (g-object gdk-window)) @@ -539,6 +543,7 @@ ;; GdkPointerHooks; ;; GdkPointerHooks * gdk_set_pointer_hooks (const GdkPointerHooks *new_hooks); +#| (defcfun gdk-offscreen-window-get-pixmap (g-object pixmap) (window (g-object gdk-window))) @@ -560,6 +565,7 @@ (window (g-object gdk-window))) (export 'gdk-window-geometry-changed) +|# (defcfun gdk-window-redirect-to-drawable :void (window (g-object gdk-window)) -- 1.7.10.4