aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPengji Zhang2025-03-23 11:48:14 +0800
committerArash Esbati2025-07-14 21:24:45 +0200
commit5d9a67e4bd374a0f6741bc56a37190aa51062d69 (patch)
treeb20e4f0b1636ca5c4510597b3ee0ea6486b2ec46
parent7f1cae9637f9a9d4715e101eecad391748e3bd3c (diff)
downloademacs-5d9a67e4bd374a0f6741bc56a37190aa51062d69.tar.gz
emacs-5d9a67e4bd374a0f6741bc56a37190aa51062d69.zip
Move some RefTeX 'setq's to major mode definition
Move two 'setq' expressions from the RefTeX label selection loop to the body of the major mode definition, so to make it easier to adjust the settings of the buffer via the mode hook. * lisp/textmodes/reftex-ref.el (reftex-offer-label-menu): Move two 'setq' expressions from here... * lisp/textmodes/reftex-sel.el (reftex-select-label-mode): ...to here. (bug#77335)
-rw-r--r--lisp/textmodes/reftex-ref.el6
-rw-r--r--lisp/textmodes/reftex-sel.el6
2 files changed, 6 insertions, 6 deletions
diff --git a/lisp/textmodes/reftex-ref.el b/lisp/textmodes/reftex-ref.el
index f8bd3556018..7464268d1a7 100644
--- a/lisp/textmodes/reftex-ref.el
+++ b/lisp/textmodes/reftex-ref.el
@@ -574,12 +574,6 @@ When called with 2 \\[universal-argument] prefix args, disable magic word recogn
574 (unless (eq major-mode 'reftex-select-label-mode) 574 (unless (eq major-mode 'reftex-select-label-mode)
575 (reftex-select-label-mode)) 575 (reftex-select-label-mode))
576 (cl-pushnew (current-buffer) selection-buffers) 576 (cl-pushnew (current-buffer) selection-buffers)
577 (setq truncate-lines t)
578 (setq mode-line-format
579 (list "---- " 'mode-line-buffer-identification
580 " " 'global-mode-string " (" mode-name ")"
581 " S<" 'reftex-refstyle ">"
582 " -%-"))
583 (cond 577 (cond
584 ((= 0 (buffer-size)) 578 ((= 0 (buffer-size))
585 (let ((buffer-read-only nil)) 579 (let ((buffer-read-only nil))
diff --git a/lisp/textmodes/reftex-sel.el b/lisp/textmodes/reftex-sel.el
index 45087e69de8..84170f710e0 100644
--- a/lisp/textmodes/reftex-sel.el
+++ b/lisp/textmodes/reftex-sel.el
@@ -98,6 +98,12 @@ During a selection process, these are the local bindings.
98 98
99\\{reftex-select-label-mode-map}" 99\\{reftex-select-label-mode-map}"
100 (setq-local reftex-select-marked nil) 100 (setq-local reftex-select-marked nil)
101 (setq truncate-lines t)
102 (setq mode-line-format
103 (list "---- " 'mode-line-buffer-identification
104 " " 'global-mode-string " (" mode-name ")"
105 " S<" 'reftex-refstyle ">"
106 " -%-"))
101 (when (syntax-table-p reftex-latex-syntax-table) 107 (when (syntax-table-p reftex-latex-syntax-table)
102 (set-syntax-table reftex-latex-syntax-table)) 108 (set-syntax-table reftex-latex-syntax-table))
103 ;; We do not set a local map - reftex-select-item does this. 109 ;; We do not set a local map - reftex-select-item does this.