[clfswm-cvs] r226 - in clfswm: . src

[Philippe Brochard]

Author: pbrochard
Date: Sat May  9 18:27:46 2009
New Revision: 226

Log:
reorder-brother: Redisplay only the parent frame of the current child.

Modified:
   clfswm/ChangeLog
   clfswm/src/clfswm-circulate-mode.lisp

Modified: clfswm/ChangeLog
==============================================================================
--- clfswm/ChangeLog	(original)
+++ clfswm/ChangeLog	Sat May  9 18:27:46 2009
@@ -2,6 +2,8 @@
 
 	* src/clfswm-circulate-mode.lisp (reorder-child)
 	(reorder-brother): Handle empty frames.
+	(reorder-brother): Redisplay only the parent frame of the  current
+	child.
 
 	* src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
 	parent frame of the  current frame.

Modified: clfswm/src/clfswm-circulate-mode.lisp
==============================================================================
--- clfswm/src/clfswm-circulate-mode.lisp	(original)
+++ clfswm/src/clfswm-circulate-mode.lisp	Sat May  9 18:27:46 2009
@@ -95,7 +95,7 @@
 		*current-child* (frame-selected-child *circulate-parent*)))
 	(when frame-is-root?
 	  (setf *current-root* *current-child*))))
-    (show-all-children *current-root*)
+    (show-all-children (find-parent-frame *current-child*))
     (draw-circulate-mode-window)))