mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Suppress error in non-file buffer

Browse source 
* lisp/textmodes/reftex.el (reftex--suppress-nonfile-error): New
variable.
(reftex-TeX-master-file): Don't signal error in non-file buffer.
(AUCTeX bug#76615)
This commit is contained in:
Ikumi Keita 2025-03-28 22:18:42 +09:00 • committed by Arash Esbati
parent bdee248172
commit 9057126900
1 changed files with 12 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lisp/textmodes/reftex.el
View file

@ -62,6 +62,12 @@
(setq reftex-tables-dirty t)
(set symbol value)))
(defvar reftex--suppress-nonfile-error nil
"When non-nil, don't signal error in non-file buffer.
Note that this is just a quick and dirty hack and is _not_ reliable at
all. It only circumvents disastrous error in `reftex-TeX-master-file',
in case that the user turns on RefTeX in latex mode hook.")
;; Configuration variables
(require 'reftex-vars)
@ -377,7 +383,8 @@ If the symbols for the current master file do not exist, they are created."
(buffer-file-name)))))
(cond
((null master)
(error "Need a filename for this buffer, please save it first"))
(or reftex--suppress-nonfile-error
(error "Need a filename for this buffer, please save it first")))
((or (file-exists-p (concat master ".tex"))
(find-buffer-visiting (concat master ".tex")))
;; Ahh, an extra .tex was missing...
@ -389,7 +396,10 @@ If the symbols for the current master file do not exist, they are created."
(t
;; Use buffer file name.
(setq master (buffer-file-name))))
(expand-file-name master)))
(if (and (not master)
reftex--suppress-nonfile-error)
"<none>.tex"
(expand-file-name master))))
(defun reftex-is-multi ()
;; Tell if this is a multifile document. When not sure, say yes.