about summary refs log tree commit diff
path: root/exwm-manage.el
diff options
context:
space:
mode:
authorChris Feng <chris.w.feng@gmail.com>2016-07-21T04·41+0800
committerChris Feng <chris.w.feng@gmail.com>2016-07-21T04·41+0800
commit6571bb5761241be16c49f4b9af4314851b36eb18 (patch)
tree818ed75c0da826f0379d1145bd9147c549648706 /exwm-manage.el
parent3909f65bae17af118ea7b1acf714289b35ea1b3d (diff)
Minor cleanups
; Eliminate compile warnings.
; Rename frame parameter 'exwm--urgency' to 'exwm-urgency'.
; Simplify expressions.
Diffstat (limited to 'exwm-manage.el')
-rw-r--r--exwm-manage.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/exwm-manage.el b/exwm-manage.el
index 7a3a18b88e62..260571b6c02a 100644
--- a/exwm-manage.el
+++ b/exwm-manage.el
@@ -420,8 +420,8 @@ manager is shutting down."
         (xcb:+request exwm--connection
             (make-instance 'xcb:UnmapWindow :window exwm--container))
         (xcb:flush exwm--connection)
-        (run-with-timer exwm-manage-ping-timeout nil
-                        `(lambda () (exwm-manage--kill-client ,id)))
+        (run-with-timer exwm-manage-ping-timeout nil #'exwm-manage--kill-client
+                        id)
         ;; Wait for DestroyNotify event.
         (throw 'return nil))
       ;; Try to determine if the X window is dead with _NET_WM_PING.