emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/auctex ebe0ef11d1 06/30: ; Revert "; * latex.el (LaTeX-


From: Tassilo Horn
Subject: [elpa] externals/auctex ebe0ef11d1 06/30: ; Revert "; * latex.el (LaTeX-completion-parse-args): Use `cl-flet'."
Date: Thu, 7 Dec 2023 03:51:07 -0500 (EST)

branch: externals/auctex
commit ebe0ef11d1b713bd56ea99db21ec07c99d1e1e46
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    ; Revert "; * latex.el (LaTeX-completion-parse-args): Use `cl-flet'."
    
    This reverts commit 8e4043a899af78aead072e801899c2a1b5cabc15.
    
    `cl-flet' creates its own lexical environment but we need a
    dynamic binding of `y-or-n-p'.
---
 latex.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/latex.el b/latex.el
index f56b51893c..a3e297a884 100644
--- a/latex.el
+++ b/latex.el
@@ -7733,7 +7733,7 @@ or `LaTeX-environment-list' and returns it."
     ;; cases, but will also fail for example in hyperref.el.  This
     ;; decision should revisited at a later stage:
     (when (assq 'TeX-arg-conditional arg-list)
-      (cl-flet ((y-or-n-p #'TeX-always))
+      (cl-letf (((symbol-function 'y-or-n-p) #'TeX-always))
         (while (and arg-list
                     (setq arg (car arg-list)))
           (if (and (listp arg) (eq (car arg) 'TeX-arg-conditional))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]