Unverified Commit b3152ebb authored by Andy Stewart's avatar Andy Stewart Committed by GitHub
Browse files

Merge pull request #94 from MatthewZMD/master 

Create eaf-setq macro, so user can omit backquote
parents 5f405b13 0300576a

README.md

+1 −1
Original line number Diff line number Diff line
@@ -111,7 +111,7 @@ You can easily configure variables that EAF Python side uses with the Emacs Lisp 
#### EAF Camera

The default directory to store images taken by EAF Camera is `~/Downloads`. To change it, put the following in `.emacs`

```Elisp

(eaf-set 'eaf-camera-save-path "~/Downloads")

(eaf-setq eaf-camera-save-path "~/Downloads")

```

### Proxy

If you can't access most awesome internet services like me, you perhaps need proxy settings like below:

docs/HACKING.md

+1 −1
Original line number Diff line number Diff line
@@ -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:



```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```

eaf.el

+10 −4
Original line number Diff line number Diff line
@@ -7,7 +7,7 @@ 
;; Copyright (C) 2018, Andy Stewart, all rights reserved.

;; Created: 2018-06-15 14:10:12

;; 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

;; URL: http://www.emacswiki.org/emacs/download/eaf.el

;; Keywords:
@@ -135,7 +135,7 @@ 
  '((eaf-camera-save-path . "~/Downloads"))

  "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

  "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))))



(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)

    (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)

  (let* ((coordinate-list (split-string msg ","))

         (mouse-press-x (string-to-number (nth 0 coordinate-list)))