[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/xelb b34f0dc 1/3: * xcb-keysyms.el: Use closure.
From: |
Chris Feng |
Subject: |
[elpa] externals/xelb b34f0dc 1/3: * xcb-keysyms.el: Use closure. |
Date: |
Mon, 5 Aug 2019 11:51:47 -0400 (EDT) |
branch: externals/xelb
commit b34f0dce2649fabb5091e835c88dca815859294f
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
* xcb-keysyms.el: Use closure.
---
xcb-keysyms.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/xcb-keysyms.el b/xcb-keysyms.el
index ad365aa..417bc21 100644
--- a/xcb-keysyms.el
+++ b/xcb-keysyms.el
@@ -103,11 +103,11 @@ This method must be called before using any other method
in this module."
(xcb:keysyms:-update-modkeys obj xcb:xkb:ID:UseCoreKbd)
;; Attach event listeners.
(xcb:+event obj 'xcb:xkb:NewKeyboardNotify
- `(lambda (data _)
- (xcb:keysyms:-on-NewKeyboardNotify ,obj data)))
+ (lambda (data _)
+ (xcb:keysyms:-on-NewKeyboardNotify obj data)))
(xcb:+event obj 'xcb:xkb:MapNotify
- `(lambda (data _)
- (xcb:keysyms:-on-MapNotify ,obj data)))
+ (lambda (data _)
+ (xcb:keysyms:-on-MapNotify obj data)))
;; Select XKB MapNotify and NewKeyboardNotify events.
(let ((map (logior xcb:xkb:MapPart:KeyTypes
xcb:xkb:MapPart:KeySyms