projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge subset of commit '4a6ca9e91e82da3047bd0029296e00e9030a3686' of git://github...
[cl-gtk2.git]
/
gdk
/
gdk.objects.lisp
diff --git
a/gdk/gdk.objects.lisp
b/gdk/gdk.objects.lisp
index
b62007e
..
dede160
100644
(file)
--- 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)))
(: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)
(#+gtk-2.18
(cursor gdk-window-cursor "cursor"
"GdkCursor" t t)
@@
-749,7
+750,7
@@
(time :uint32)
(x :double)
(y :double)
(time :uint32)
(x :double)
(y :double)
- (axes (fixed-array :double 2))
+ (axes (fixed-array :double 7))
(state :uint)
(button :uint)
(device (g-object gdk-device))
(state :uint)
(button :uint)
(device (g-object gdk-device))
@@
-768,7
+769,7
@@
(time :uint32)
(x :double)
(y :double)
(time :uint32)
(x :double)
(y :double)
- (axes (fixed-array :double 2))
+ (axes (fixed-array :double 7))
(state modifier-type)
(is-hint :int16)
(device (g-object gdk-device))
(state modifier-type)
(is-hint :int16)
(device (g-object gdk-device))