branch: externals/auctex
commit 5484b57bc46688c3a8fa2ec45f261fce87a3bebb
Author: Arash Esbati <ar...@gnu.org>
Commit: Arash Esbati <ar...@gnu.org>
Don't rely on the value of `LaTeX-current-environment'
* style/breqn.el (LaTeX-breqn-key-val-options):
* style/changelog.el (LaTeX-changelog-key-val-options): Remove
usage of the variable `LaTeX-current-environment'.
---
style/breqn.el | 3 +--
style/changelog.el | 3 +--
2 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/style/breqn.el b/style/breqn.el
index 9b2ae933f7..bdca52839f 100644
--- a/style/breqn.el
+++ b/style/breqn.el
@@ -66,8 +66,7 @@ The keys \"label\" and \"labelprefix\" are omitted.")
(defun LaTeX-breqn-key-val-options ()
"Return updated key=val's based on the current \"breqn\" environment."
- (let ((currenv (or LaTeX-current-environment
- (LaTeX-current-environment))))
+ (let ((currenv (LaTeX-current-environment)))
(cond ((string-match-p "\\`dgroup" currenv)
(append '(("noalign") ("brace"))
LaTeX-breqn-key-val-options))
diff --git a/style/changelog.el b/style/changelog.el
index 227caa3c81..1f7dccea04 100644
--- a/style/changelog.el
+++ b/style/changelog.el
@@ -59,8 +59,7 @@ The keys sectioncmd and label are added in the function
(defun LaTeX-changelog-key-val-options ()
"Return an updated list of key=vals from changelog package."
- (let ((currenv (or LaTeX-current-environment
- (LaTeX-current-environment)))
+ (let ((currenv (LaTeX-current-environment))
(seccmds (mapcar #'car LaTeX-section-list)))
(if (string= currenv "changelog")
(append
