[clfswm-cvs] r281 - clfswm/src

[Philippe Brochard]

Author: pbrochard
Date: Tue Jul 20 17:36:36 2010
New Revision: 281

Log:
bindings-second-mode.lisp (set-default-second-mouse): Use mouse-move-child-over-frame instead of mouse-move-window-over-frame

Modified:
   clfswm/src/bindings-second-mode.lisp

Modified: clfswm/src/bindings-second-mode.lisp
==============================================================================
--- clfswm/src/bindings-second-mode.lisp	(original)
+++ clfswm/src/bindings-second-mode.lisp	Tue Jul 20 17:36:36 2010
@@ -240,7 +240,7 @@
   (define-second-mouse (3) 'sm-mouse-click-to-focus-and-resize)
   (define-second-mouse (1 :mod-1) 'sm-mouse-click-to-focus-and-move-window)
   (define-second-mouse (3 :mod-1) 'sm-mouse-click-to-focus-and-resize-window)
-  (define-second-mouse (1 :control :mod-1) 'mouse-move-window-over-frame)
+  (define-second-mouse (1 :control :mod-1) 'mouse-move-child-over-frame)
   (define-second-mouse (4) 'sm-mouse-select-next-level)
   (define-second-mouse (5) 'sm-mouse-select-previous-level)
   (define-second-mouse (4 :mod-1) 'sm-mouse-enter-frame)