gtk: fix X selection for older Gtk versions

Merge to 5.1

original commit: f21f0bdba2af7282b747e858d81379135a5189a9
This commit is contained in:
Matthew Flatt 2011-02-09 07:41:19 -07:00
parent dc520a9a47
commit 13af6a6145

View File

@ -25,7 +25,6 @@
(define _GtkClipboard (_cpointer 'GtkClipboard))
(define _GtkDisplay _pointer)
(define _GtkSelectionData (_cpointer 'GtkSelectionData))
;; Recent versions of Gtk provide function calls to
;; access data, but use structure when the functions are
@ -38,6 +37,7 @@
[length _int]
[display _GtkDisplay]))
(define _GtkSelectionData _GtkSelectionDataT-pointer)
(define-gdk gdk_atom_intern (_fun _string _gboolean -> _GdkAtom))