From 96c0d9e9531ab90568efca4e2599fa18d8a5666e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 7 Jul 2003 20:52:27 +0000 Subject: [PATCH] (tex-main-file): Use with-no-warnings. --- lisp/textmodes/tex-mode.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index a7b2d8e8f81..ca345f8b635 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -1651,8 +1651,10 @@ of the current buffer." "Return the relative name of the main file." (let* ((file (or tex-main-file ;; Compatibility with AUCTeX. - (and (boundp 'TeX-master) (stringp TeX-master) - (set (make-local-variable 'tex-main-file) TeX-master)) + (with-no-warnings + (when (and (boundp 'TeX-master) (stringp TeX-master)) + (make-local-variable 'tex-main-file) + (setq tex-main-file TeX-master))) ;; Try to guess the main file. (if (not buffer-file-name) (error "Buffer is not associated with any file") -- 2.39.5