[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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master ebe0ef11: ; Revert "; * latex.el (LaTeX-completion-parse-args): Use `cl-flet'.",
Arash Esbati <=