X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.tree-view.lisp;h=dedd4352a37269eb0db67d628842d14cbc9cbb77;hb=9af0a44db2b9491749a7936c782c3d7ff1b804a3;hp=487ddb2b8f73396ea91d84e8c0443f4db834738c;hpb=51aa0c04d9522fa9c17555cc779036aa9703ef02;p=cl-gtk2.git

diff --git a/gtk/gtk.tree-view.lisp b/gtk/gtk.tree-view.lisp
index 487ddb2..dedd435 100644
--- a/gtk/gtk.tree-view.lisp
+++ b/gtk/gtk.tree-view.lisp
@@ -30,7 +30,7 @@
 
 (export 'tree-view-get-column)
 
-(defcfun (tree-view-columns "gtk_tree_view_columns") (glist g-object)
+(defcfun (tree-view-columns "gtk_tree_view_get_columns") (glist g-object)
   (tree-view g-object))
 
 (export 'tree-view-columns)
@@ -407,7 +407,7 @@
                                             (callback stable-pointer-free-destroy-notify-callback))
       (gtk-tree-view-set-row-separator-func tree-view (null-pointer) (null-pointer) (null-pointer))))
 
-(defcfun (tree-view-rubber-banding-active "gtk_tree_view_get_rubber_banding_active") :boolean
+(defcfun (tree-view-rubber-banding-active "gtk_tree_view_is_rubber_banding_active") :boolean
   (tree-view g-object))
 
 (export 'tree-view-rubber-banding-active)