X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.paned.lisp;h=54fd9e968c1a1f8a51099a26875ded89a0546c3b;hb=4ef6a090655cb5043a76c2afc9b15467606b7028;hp=5cec6dbabdf5e55eeaa4e6a8f237aa67c8943b23;hpb=e9622209ae8a02f82c2813ea7d358d711e1ba2d0;p=cl-gtk2.git diff --git a/gtk/gtk.paned.lisp b/gtk/gtk.paned.lisp index 5cec6db..54fd9e9 100644 --- a/gtk/gtk.paned.lisp +++ b/gtk/gtk.paned.lisp @@ -1,24 +1,24 @@ (in-package :gtk) -(defcfun gtk-paned-pack-1 :void +(defcfun gtk-paned-pack1 :void (paned g-object) (child g-object) (resize :boolean) (shrink :boolean)) (defun paned-pack-1 (paned child &key (resize nil) (shrink t)) - (gtk-paned-pack-1 paned child resize shrink)) + (gtk-paned-pack1 paned child resize shrink)) -(export 'panged-pack-1) +(export 'paned-pack-1) -(defcfun gtk-paned-pack-2 :void +(defcfun gtk-paned-pack2 :void (paned g-object) (child g-object) (resize :boolean) (shrink :boolean)) (defun paned-pack-2 (paned child &key (resize t) (shrink t)) - (gtk-paned-pack-2 paned child resize shrink)) + (gtk-paned-pack2 paned child resize shrink)) (export 'paned-pack-2)