X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/22fdd8b14d61f98355d776b7e91a56371883d25c..e9269590110d22aceb3bcbdd9093fa36dcd15e35:/gtk/gtkselection.lisp diff --git a/gtk/gtkselection.lisp b/gtk/gtkselection.lisp index e4a66fe..a7a3147 100644 --- a/gtk/gtkselection.lisp +++ b/gtk/gtkselection.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtkselection.lisp,v 1.7 2006/02/26 15:22:47 espen Exp $ +;; $Id: gtkselection.lisp,v 1.8 2006/04/10 18:54:47 espen Exp $ (in-package "GTK") @@ -97,7 +97,8 @@ (defbinding (selection-set-owner "gtk_selection_owner_set_for_display") boolean (display gdk:display) (widget widget) - ((gdk:atom-intern selection) gdk:atom)) + ((gdk:atom-intern selection) gdk:atom) + (time (unsigned 32))) (defbinding selection-add-target () nil (widget widget)