From b6c62d5549aafd422300412c2a3f53a6f9a415b9 Mon Sep 17 00:00:00 2001 From: Andrey Kutejko Date: Mon, 22 Feb 2010 16:58:38 +0200 Subject: [PATCH] added clipboard-clear --- gtk/gtk.clipboard.lisp | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/gtk/gtk.clipboard.lisp b/gtk/gtk.clipboard.lisp index 846e107..269d1db 100644 --- a/gtk/gtk.clipboard.lisp +++ b/gtk/gtk.clipboard.lisp @@ -10,3 +10,11 @@ (export 'clipboard-set-text) +(defcfun gtk-clipboard-clear :void + (clipboard g-object)) + +(defun clipboard-clear (clipboard) + (gtk-clipboard-clear clipboard)) + +(export 'clipboard-clear) + -- 1.7.10.4