[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm d998b42 34/64: Provide hooks run when the floating
From: |
Chris Feng |
Subject: |
[elpa] externals/exwm d998b42 34/64: Provide hooks run when the floating state of a window changes (close #28) |
Date: |
Thu, 17 Sep 2015 23:18:02 +0000 |
branch: externals/exwm
commit d998b42b89bc9e248b6d2250c56ddd17ec4b17cf
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
Provide hooks run when the floating state of a window changes (close #28)
---
exwm-floating.el | 11 +++++++++--
1 files changed, 9 insertions(+), 2 deletions(-)
diff --git a/exwm-floating.el b/exwm-floating.el
index 06d6fa5..bc6b1a2 100644
--- a/exwm-floating.el
+++ b/exwm-floating.el
@@ -36,6 +36,11 @@
(defvar exwm-floating-border-color "blue"
"Border color of the floating window.")
+(defvar exwm-floating-setup-hook nil
+ "Normal hook run when a window has been made floating.")
+(defvar exwm-floating-exit-hook nil
+ "Normal hook run when a window has exited floating state.")
+
(defun exwm-floating--set-floating (id)
"Make window ID floating."
(interactive)
@@ -180,7 +185,8 @@
exwm--floating-frame frame)
(set-window-buffer window (current-buffer)) ;this changes current buffer
(set-window-dedicated-p window t))
- (select-window window)))
+ (select-window window))
+ (run-hooks 'exwm-floating-setup-hook))
(defun exwm-floating--unset-floating (id)
"Make window ID non-floating."
@@ -213,7 +219,8 @@
exwm--frame exwm-workspace--current))
(let ((window (frame-selected-window exwm-workspace--current)))
(set-window-buffer window buffer)
- (select-window window))))
+ (select-window window)))
+ (run-hooks 'exwm-floating-exit-hook))
(defun exwm-floating-toggle-floating ()
"Toggle the current window between floating and non-floating states."
- [elpa] externals/exwm edc70eb 22/64: Remove redundant code caused by the concurrency of events, (continued)
- [elpa] externals/exwm edc70eb 22/64: Remove redundant code caused by the concurrency of events, Chris Feng, 2015/09/17
- [elpa] externals/exwm 2d4104a 23/64: Fix emacsclient bugs, Chris Feng, 2015/09/17
- [elpa] externals/exwm 24b964b 25/64: Ignore repeated `MappingNotify` events, Chris Feng, 2015/09/17
- [elpa] externals/exwm 801185c 27/64: Fix buffer switch problems, Chris Feng, 2015/09/17
- [elpa] externals/exwm 1ce18af 28/64: Center floating windows by default, Chris Feng, 2015/09/17
- [elpa] externals/exwm 048994c 24/64: Remove redundant code caused by the concurrency of events (continued), Chris Feng, 2015/09/17
- [elpa] externals/exwm 35560a4 30/64: Minor fixes for emacsclient, Chris Feng, 2015/09/17
- [elpa] externals/exwm b755296 26/64: Remove redundant code caused by the concurrency of events (contd, 2), Chris Feng, 2015/09/17
- [elpa] externals/exwm 7bfd429 33/64: Honor `value-mask` field in ConfigureRequest event, Chris Feng, 2015/09/17
- [elpa] externals/exwm dba43b0 32/64: Fix input focus stealing, Chris Feng, 2015/09/17
- [elpa] externals/exwm d998b42 34/64: Provide hooks run when the floating state of a window changes (close #28),
Chris Feng <=
- [elpa] externals/exwm 15ad591 35/64: Fix bug when moving a window to the current workspace, Chris Feng, 2015/09/17
- [elpa] externals/exwm 43b00d2 36/64: fix buffer renaming, Chris Feng, 2015/09/17
- [elpa] externals/exwm 2d07429 39/64: Merge branch 'move-window-fix' of https://github.com/pipcet/exwm into pipcet-move-window-fix, Chris Feng, 2015/09/17
- [elpa] externals/exwm 5882015 40/64: Merge branch 'pipcet-move-window-fix', Chris Feng, 2015/09/17
- [elpa] externals/exwm 04e4269 29/64: Improve input focus switch mechanism, Chris Feng, 2015/09/17
- [elpa] externals/exwm 7120291 38/64: Merge branch 'pipcet-robustness', Chris Feng, 2015/09/17
- [elpa] externals/exwm 5210e13 41/64: Only manage windows mapped as the direct children of root window (close #38), Chris Feng, 2015/09/17
- [elpa] externals/exwm 07e59e0 31/64: Fix multi-screen bugs, Chris Feng, 2015/09/17
- [elpa] externals/exwm d1806e9 37/64: Improve code robustness., Chris Feng, 2015/09/17
- [elpa] externals/exwm bb4ebde 46/64: Fix `exwm-workspace-rename-buffer`, Chris Feng, 2015/09/17