X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.cell-renderer.lisp;h=25dda526abfd2aa82eb287ab37f24b10706ce1a7;hb=96aa7293addaacdfe29ce32e60e2feac7df6ffce;hp=4de7f008e1b788b034653a8e841068da3eeebca1;hpb=c5a046da8c5ca824b266ff48034a860790dc1aa3;p=cl-gtk2.git

diff --git a/gtk/gtk.cell-renderer.lisp b/gtk/gtk.cell-renderer.lisp
index 4de7f00..25dda52 100644
--- a/gtk/gtk.cell-renderer.lisp
+++ b/gtk/gtk.cell-renderer.lisp
@@ -15,9 +15,9 @@
 ; TODO: gtk_cell_renderer_stop_editing
 
 (defcfun gtk-cell-renderer-get-fixed-size :void
-  (cell g-object)
-  (width :pointer)
-  (height :pointer))
+  (cell (g-object cell-renderer))
+  (width (:pointer :int))
+  (height (:pointer :int)))
 
 (defun cell-renderer-get-fixed-size (cell)
   (with-foreign-objects ((width :int) (height :int))
@@ -27,14 +27,11 @@
 
 (export 'cell-renderer-get-fixed-size)
 
-(defcfun gtk-cell-renderer-set-fixed-size :void
-  (cell g-object)
+(defcfun (cell-renderer-set-fixed-size "gtk_cell_renderer_set_fixed_size") :void
+  (cell (g-object cell-renderer))
   (width :int)
   (height :int))
 
-(defun cell-renderer-set-fixed-size (cell width height)
-  (gtk-cell-renderer-set-fixed-size cell width height))
-
 (export 'cell-renderer-set-fixed-size)
 
 ; TODO: GtkCellRendererAccel