X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/9b662d946c3941ee7bb7d2b07cce264ced57468f..25d755bb92d7a70ce26cc4df27f6779dc24889e8:/gtk/gtkselection.lisp diff --git a/gtk/gtkselection.lisp b/gtk/gtkselection.lisp index 7136573..8b72f49 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)