[elpa] externals/async a60b721877 1/4: Eval variable value later in async-inject-variables

[ELPA Syncer]

branch: externals/async
commit a60b721877eea5d78aebfd2d972c05eb02d4c0a1
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Eval variable value later in async-inject-variables
---
 async.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/async.el b/async.el
index 83c8c4cd86..cea3fff851 100644
--- a/async.el
+++ b/async.el
@@ -143,14 +143,15 @@ It is intended to be used as follows:
     ,@(let (bindings)
         (mapatoms
          (lambda (sym)
-           (let* ((sname (and (boundp sym) (symbol-name sym)))
-                  (value (and sname (symbol-value sym))))
+           (let ((sname (and (boundp sym) (symbol-name sym)))
+                 value)
              (when (and sname
                         (or (null include-regexp)
                             (string-match include-regexp sname))
                         (or (null exclude-regexp)
                             (not (string-match exclude-regexp sname)))
                         (not (string-match "-syntax-table\\'" sname)))
+               (setq value (symbol-value sym))
                (unless (or (stringp value)
                            (memq value '(nil t))
                            (numberp value)