[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[STUMP] [patch] saner default in float-group
From: |
Manuel Giraud |
Subject: |
[STUMP] [patch] saner default in float-group |
Date: |
Fri, 19 Nov 2010 16:25:05 +0100 |
User-agent: |
Gnus/5.1299999999999999 (Gnus v5.13) Emacs/23.2 (berkeley-unix) |
Hi,
I'm just coming back from cwm to stumpwm and it feels good to be at
home.
Here is patch that sets the focus-on-click policy on by default in
float-group. I think that it is easier for the newcomer.
diff --git a/floating-group.lisp b/floating-group.lisp
index c3fafb5..67ab8bf 100644
--- a/floating-group.lisp
+++ b/floating-group.lisp
@@ -239,7 +239,7 @@
(setf (window-x window) (xlib:drawable-x (window-parent window))
(window-y window) (xlib:drawable-y (window-parent
window)))))))
(t
- (when (eq *mouse-focus-policy* :click)
+ (unless (eq *mouse-focus-policy* :sloppy)
(focus-window window))))))
(defmethod group-button-press ((group float-group) x y where)
--
Manuel Giraud
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [STUMP] [patch] saner default in float-group,
Manuel Giraud <=