X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fui-markup.lisp;fp=gtk%2Fui-markup.lisp;h=71b17253057c44dff8ee7a5a5f8f39d48cfcd49e;hb=8ee73448cf7fb0ee832219593e6ffa1eb53e4e45;hp=f64c4d48da84cbb24d2f40ff7e9b2f85e68fecfe;hpb=d35f95662afdacd10760f6cac5e01edf75be6b36;p=cl-gtk2.git

diff --git a/gtk/ui-markup.lisp b/gtk/ui-markup.lisp
index f64c4d4..71b1725 100644
--- a/gtk/ui-markup.lisp
+++ b/gtk/ui-markup.lisp
@@ -82,11 +82,7 @@
   (unless bottom
     (error "bottom is a mandatory child property for table packing"))
 
-  (table-attach table child
-		:left left
-		:right right
-		:top top
-		:bottom bottom
+  (table-attach table child left right top bottom
 		:x-options x-options
 		:y-options y-options
 		:x-padding x-padding