[sawfish] two small ui-changes in SawfishConfig



commit d20188e66942b42c7c320b0936fe1bdabbc30959
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Sun Sep 19 18:50:26 2010 +0200

    two small ui-changes in SawfishConfig

 ChangeLog                 |    5 +++++
 lisp/sawfish/cfg/shell.jl |    4 ++--
 2 files changed, 7 insertions(+), 2 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index cdc6968..603232b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -24,6 +24,11 @@
 	* lisp/sawfish/gtk/widgets/list.jl: use the nicer gtk-stock-buttons rather
 	than plain ones
 
+	* lisp/sawfish/cfg/shell.jl: the default window-size of SawfishConfig
+	differed depending on wethere there's a socket-id or not. Now both are
+	equal. Besides the shadow-type of the root-container was changed from out
+	to etched-in.
+
 2010-09-18  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/gtk/widgets/simple-dialog.jl: renamed sawfish.gtk.stock
 	to sawfish.gtk.widgets.simple-dialog as the functions `about-dialog'
diff --git a/lisp/sawfish/cfg/shell.jl b/lisp/sawfish/cfg/shell.jl
index ae1714d..606298f 100644
--- a/lisp/sawfish/cfg/shell.jl
+++ b/lisp/sawfish/cfg/shell.jl
@@ -61,12 +61,12 @@
 			  (gtk-window-new 'toplevel)))
       (if socket-id
 	  (progn
-	    (gtk-window-set-default-size main-window 400 300)
+	    (gtk-window-set-default-size main-window 550 400)
 	    (setq root-container main-window))
 	(gtk-window-set-resizable main-window t)
 	(gtk-window-set-default-size main-window 550 400)
 	(setq root-container (gtk-frame-new))
-	(gtk-frame-set-shadow-type root-container 'out)
+	(gtk-frame-set-shadow-type root-container 'etched-in)
 	(gtk-container-add main-window root-container))
 
       (setq slot-box-widget (gtk-vbox-new nil box-spacing))



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]