# HG changeset patch # User Richard M. Stallman # Date 1057611147 0 # Node ID 09e60f24d0c46a07e4c35d1f1615531f57488e98 # Parent cd4ac91f52c970b96ef6952c04e3ad2fb4b125fc (tex-main-file): Use with-no-warnings. diff -r cd4ac91f52c9 -r 09e60f24d0c4 lisp/textmodes/tex-mode.el --- a/lisp/textmodes/tex-mode.el Mon Jul 07 20:50:15 2003 +0000 +++ b/lisp/textmodes/tex-mode.el Mon Jul 07 20:52:27 2003 +0000 @@ -1651,8 +1651,10 @@ "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")