projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Clean up after merge
[cl-gtk2.git]
/
gtk
/
gtk.clipboard.lisp
diff --git
a/gtk/gtk.clipboard.lisp
b/gtk/gtk.clipboard.lisp
index
269d1db
..
9dc244f
100644
(file)
--- a/
gtk/gtk.clipboard.lisp
+++ b/
gtk/gtk.clipboard.lisp
@@
-1,7
+1,7
@@
(in-package :gtk)
(defcfun gtk-clipboard-set-text :void
(in-package :gtk)
(defcfun gtk-clipboard-set-text :void
- (clipboard g-object)
+ (clipboard (g-object clipboard))
(text :string)
(len :int))
(text :string)
(len :int))
@@
-10,11
+10,8
@@
(export 'clipboard-set-text)
(export 'clipboard-set-text)
-(defcfun gtk-clipboard-clear :void
- (clipboard g-object))
-
-(defun clipboard-clear (clipboard)
- (gtk-clipboard-clear clipboard))
+(defcfun (clipboard-clear "gtk_clipboard_clear") :void
+ (clipboard (g-object clipboard)))
(export 'clipboard-clear)
(export 'clipboard-clear)