[elpa] externals/org f6813dbea9: lisp/org.el: Don't use lexical scope for diary related evals

[ELPA Syncer]

branch: externals/org
commit f6813dbea9ef0c6be19bf68b4d9227ceb64c9449
Author: Bastien <bzg@gnu.org>
Commit: Bastien <bzg@gnu.org>

    lisp/org.el: Don't use lexical scope for diary related evals
    
    * lisp/org.el (org-diary-sexp-entry): Don't use lexical scope for eval
    sexps.
    
    This commit partially reverts 6d73cd34a.
    
    Reported-by: Eric S Fraga <e.fraga@ucl.ac.uk>
---
 lisp/org.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 59714c1713..3cc8a50367 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -15040,9 +15040,11 @@ D may be an absolute day number, or a calendar-type 
list (month day year)."
   (let* ((sexp `(let ((entry ,entry)
                      (date ',d))
                  ,(car (read-from-string sexp))))
-        (result (if calendar-debug-sexp (eval sexp t)
+         ;; FIXME: Do not use (eval ... t) in the following sexp as
+         ;; diary vars are still using dynamic scope.
+        (result (if calendar-debug-sexp (eval sexp)
                   (condition-case nil
-                      (eval sexp t)
+                      (eval sexp)
                     (error
                      (beep)
                      (message "Bad sexp at line %d in %s: %s"