auctex-diffs
[Top][All Lists]
Advanced

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

master ebe0ef11: ; Revert "; * latex.el (LaTeX-completion-parse-args): U


From: Arash Esbati
Subject: master ebe0ef11: ; Revert "; * latex.el (LaTeX-completion-parse-args): Use `cl-flet'."
Date: Mon, 30 Oct 2023 07:53:29 -0400 (EDT)

branch: master
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 f56b5189..a3e297a8 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]