From 11e5e1f82b53b7b8b3f7b670b563539bb2afbc9e Mon Sep 17 00:00:00 2001 Message-Id: <11e5e1f82b53b7b8b3f7b670b563539bb2afbc9e.1714623307.git.mdw@distorted.org.uk> From: Mark Wooding Date: Mon, 10 Apr 2006 18:54:47 +0000 Subject: [PATCH] Added missing argument to selection-set-owner Organization: Straylight/Edgeware From: espen --- gtk/gtkselection.lisp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) 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) -- [mdw]