[sawfish] more natural keymap for raise-lower-button



commit b1cae1508e59bec16c068857cdd15916823d5e08
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Fri Feb 18 21:48:54 2011 +0100

    more natural keymap for raise-lower-button

 lisp/sawfish/wm/keymaps.jl |    9 +++++----
 1 files changed, 5 insertions(+), 4 deletions(-)
---
diff --git a/lisp/sawfish/wm/keymaps.jl b/lisp/sawfish/wm/keymaps.jl
index 2ea6832..709977a 100644
--- a/lisp/sawfish/wm/keymaps.jl
+++ b/lisp/sawfish/wm/keymaps.jl
@@ -214,10 +214,11 @@
     :type keymap)
 
   (defcustom raise-lower-button-keymap (bind-keys (make-keymap)
-						  "Button1-Off" 'raise-window
-						  "Button2-Off" 'lower-window
-						  "Button4-Off" 'raise-window-depth
-						  "Button5-Off" 'lower-window-depth)
+						  "Button1-Off" 'raise-window-depth
+						  "Button2-Off" 'raise-window
+						  "Button3-Off" 'lower-window-depth
+						  "Button4-Off" 'raise-window
+						  "Button5-Off" 'lower-window)
     "Keymap of \"raise/lower\" button. Mouse-bindings only."
     :group bindings
     :type keymap)



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