[cells-gtk-cvs] CVS update: root/cells-gtk/layout.lisp

[Peter Denno]

Update of /project/cells-gtk/cvsroot/root/cells-gtk
In directory common-lisp.net:/tmp/cvs-serv8082/cells-gtk

Modified Files:
	layout.lisp 
Log Message:
Not sure of this, but new arguments to gtk-box-pack-start.
Date: Sun May 29 23:08:22 2005
Author: pdenno

Index: root/cells-gtk/layout.lisp
diff -u root/cells-gtk/layout.lisp:1.4 root/cells-gtk/layout.lisp:1.5
--- root/cells-gtk/layout.lisp:1.4	Sat Feb 12 15:52:10 2005
+++ root/cells-gtk/layout.lisp	Sun May 29 23:08:22 2005
@@ -29,8 +29,8 @@
 (def-c-output .kids ((self box))
   (when new-value
     (dolist (kid new-value)
-      (gtk-box-pack-start (id self) (id kid) 
-			  (expand? kid) (fill? kid) (padding? kid)))
+        (gtk-box-pack-start (id self) (id kid) 
+                            (expand? kid) (fill? kid) (padding? kid)))
     #+clisp (call-next-method)))
 
 (def-widget hbox (box)