Merge pull request #94 from MatthewZMD/master

Create eaf-setq macro, so user can omit backquote
master
Andy Stewart 6 years ago committed by GitHub
commit b3152ebb9c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
  1. 2
      README.md
  2. 2
      docs/HACKING.md
  3. 14
      eaf.el

@ -111,7 +111,7 @@ You can easily configure variables that EAF Python side uses with the Emacs Lisp
#### EAF Camera #### EAF Camera
The default directory to store images taken by EAF Camera is `~/Downloads`. To change it, put the following in `.emacs` The default directory to store images taken by EAF Camera is `~/Downloads`. To change it, put the following in `.emacs`
```Elisp ```Elisp
(eaf-set 'eaf-camera-save-path "~/Downloads") (eaf-setq eaf-camera-save-path "~/Downloads")
``` ```
### Proxy ### Proxy
If you can't access most awesome internet services like me, you perhaps need proxy settings like below: If you can't access most awesome internet services like me, you perhaps need proxy settings like below:

@ -209,7 +209,7 @@ If your application will do some long-time operation, you can use below use belo
You can use below code set the save patch of camera photo: You can use below code set the save patch of camera photo:
```Elisp ```Elisp
(eaf-set 'eaf-camera-save-path "~/Downloads") (eaf-setq eaf-camera-save-path "~/Downloads")
``` ```
On the python side, you can use below code pick up the value of ```eaf-camera-save-path``` On the python side, you can use below code pick up the value of ```eaf-camera-save-path```

@ -7,7 +7,7 @@
;; Copyright (C) 2018, Andy Stewart, all rights reserved. ;; Copyright (C) 2018, Andy Stewart, all rights reserved.
;; Created: 2018-06-15 14:10:12 ;; Created: 2018-06-15 14:10:12
;; Version: 0.3 ;; Version: 0.3
;; Last-Updated: Thu Nov 28 15:40:24 2019 (-0500) ;; Last-Updated: Fri Nov 29 08:46:55 2019 (-0500)
;; By: Mingde (Matthew) Zeng ;; By: Mingde (Matthew) Zeng
;; URL: http://www.emacswiki.org/emacs/download/eaf.el ;; URL: http://www.emacswiki.org/emacs/download/eaf.el
;; Keywords: ;; Keywords:
@ -135,7 +135,7 @@
'((eaf-camera-save-path . "~/Downloads")) '((eaf-camera-save-path . "~/Downloads"))
"The alist storing user-defined variables that's shared with EAF Python side. "The alist storing user-defined variables that's shared with EAF Python side.
Try not to modify this alist directly. Use `eaf-set' to modify instead.") Try not to modify this alist directly. Use `eaf-setq' to modify instead.")
(defvar eaf-find-alternate-file-in-dired nil (defvar eaf-find-alternate-file-in-dired nil
"If non-nil, when calling `eaf-file-open-in-dired', EAF unrecognizable files will be opened "If non-nil, when calling `eaf-file-open-in-dired', EAF unrecognizable files will be opened
@ -547,12 +547,18 @@ Otherwise call send_key message to Python side."
(eaf-call "send_key" buffer-id key-desc)))) (eaf-call "send_key" buffer-id key-desc))))
(defun eaf-set (sym val) (defun eaf-set (sym val)
"Similar to `setq', but store SYM with VAL in the EAF Python side. "Similar to `set', but store SYM with VAL in the EAF Python side.
Use it as (eaf-set 'sym val)" For convenience, use the Lisp macro `eaf-setq' instead."
(when (symbol-name sym) (when (symbol-name sym)
(map-put eaf-var-list sym val))) (map-put eaf-var-list sym val)))
(defmacro eaf-setq (var val)
"Similar to `setq', but store VAR with VAL in the EAF Python side.
Use it as (eaf-setq var val)"
`(eaf-set ',var ,val))
(defun eaf-focus-buffer (msg) (defun eaf-focus-buffer (msg)
(let* ((coordinate-list (split-string msg ",")) (let* ((coordinate-list (split-string msg ","))
(mouse-press-x (string-to-number (nth 0 coordinate-list))) (mouse-press-x (string-to-number (nth 0 coordinate-list)))

Loading…
Cancel
Save