Support emacs 28.

master
Andy Stewart 6 years ago
parent f0f9d4c1b4
commit 4b82a916ba
  1. 14
      eaf.el

@ -1133,7 +1133,9 @@ to edit EAF keybindings!" fun fun)))
"Similar to `set', but store SYM with VAL in EAF Python side, and return VAL.
For convenience, use the Lisp macro `eaf-setq' instead."
(map-put eaf-var-list sym val)
(if (version< emacs-version "27")
(map-put eaf-var-list sym val)
(map-put! eaf-var-list sym val))
(when (process-live-p eaf-process)
;; Update python side variable dynamically.
(eaf-call "update_emacs_var_dict" (eaf-serialization-var-list)))
@ -1160,11 +1162,15 @@ KEY is a string representing a sequence of keystrokes and events.
EAF-APP-KEYBINDING is one of the `eaf-<app-name>-keybinding'
variables, where <app-name> can be obtained by checking the value
of `eaf--buffer-app-name' inside the EAF buffer."
`(map-put ,eaf-app-keybinding ,key
(if (version< emacs-version "27")
`(map-put ,eaf-app-keybinding ,key
,(if (string-match "_" (symbol-name command))
(symbol-name command)
`(quote ,command)) #'equal))
`(quote ,command)) #'equal)
`(map-put! ,eaf-app-keybinding ,key
,(if (string-match "_" (symbol-name command))
(symbol-name command)
`(quote ,command)) #'equal)))
(dbus-register-signal
:session "com.lazycat.eaf" "/com/lazycat/eaf"

Loading…
Cancel
Save