diff options
| author | Pengji Zhang | 2025-03-23 11:48:14 +0800 |
|---|---|---|
| committer | Arash Esbati | 2025-07-14 21:24:45 +0200 |
| commit | 5d9a67e4bd374a0f6741bc56a37190aa51062d69 (patch) | |
| tree | b20e4f0b1636ca5c4510597b3ee0ea6486b2ec46 | |
| parent | 7f1cae9637f9a9d4715e101eecad391748e3bd3c (diff) | |
| download | emacs-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.el | 6 | ||||
| -rw-r--r-- | lisp/textmodes/reftex-sel.el | 6 |
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. |