[clfswm-devel] [PATCH] Do not create another empty frame on startup.

[Xavier Maillard]

With current code, it may confuse users to have two empty frames on
startup.

This patch just remove the creation of the "default" frame of id 1.

Signed-off-by: Xavier Maillard <xma at gnu.org>
---
The creation of several frames on startup could be put onto the
init-hook hook instead of "hardcoding" it here.

 src/clfswm.lisp |    2 --
 1 files changed, 0 insertions(+), 2 deletions(-)

diff --git a/src/clfswm.lisp b/src/clfswm.lisp
index f4e762c..5f3aeab 100644
--- a/src/clfswm.lisp
+++ b/src/clfswm.lisp
@@ -222,8 +222,6 @@
   (setf *root-frame* (create-frame :name "Root" :number 0) ;; :layout #'tile-space-layout)
 	*current-root* *root-frame*
 	*current-child* *current-root*)
-  (add-frame (create-frame :name "Default" :layout nil :x 0.05 :y 0.05 :w 0.9 :h 0.9) *root-frame*)
-  (setf *current-child* (first (frame-child *current-root*)))
   (call-hook *init-hook*)
   (process-existing-windows *screen*)
   (show-all-children)
-- 
1.5.2.2