diff options
author | Chris Feng <chris.w.feng@gmail.com> | 2019-09-14T00·00+0000 |
---|---|---|
committer | Chris Feng <chris.w.feng@gmail.com> | 2019-09-14T00·00+0000 |
commit | f167bc979c76edb43bc63cffebec095601446477 (patch) | |
tree | 6e8ecd6c1030c9f98f9b6996be3a87bab86c3dd0 /exwm-core.el | |
parent | eb49e57f762ab47e874c821c12e0b641d3dd9d8e (diff) |
Replace `frame-geometry'
* exwm-workspace.el (exwm-workspace--frame-y-offset) exwm-workspace--window-y-offset, exwm-workspace--update-offsets): New variables & function for the calculation of Emacs frame offsets, as `frame-geometry' is not available in Emacs 24. * exwm-floating.el (exwm-floating--set-floating) (exwm-floating--do-moveresize): * exwm-layout.el (exwm-layout--show): * exwm-systemtray.el (exwm-systemtray--on-workspace-switch) (exwm-systemtray--on-randr-refresh, exwm-systemtray--init): Use them. * exwm-systemtray.el (exwm-systemtray--refresh-all): Renamed from `exwm-systemtray--on-randr-refresh'. (exwm-systemtray--init, exwm-systemtray--exit): Use it. * exwm-floating.el (exwm-floating--stop-moveresize): Send a ConfigureNotify event to floating frame to update its position (seems required by Emacs 24).
Diffstat (limited to 'exwm-core.el')
-rw-r--r-- | exwm-core.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/exwm-core.el b/exwm-core.el index ed9a523448bc..b0a683999da9 100644 --- a/exwm-core.el +++ b/exwm-core.el @@ -168,8 +168,8 @@ The action is to call FUNCTION with arguments ARGS. If Emacs is not idle, defer the action until Emacs is idle. Otherwise, defer the action until at least SECS seconds later." `(run-with-idle-timer (+ (float-time (or (current-idle-time) - (seconds-to-time (- ,secs)))) - ,secs) + (seconds-to-time (- ,secs)))) + ,secs) nil ,function ,@args)) |