(tex-mode): Suppress warning about multiple definitions when compiling.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cba58f8fb2e71d2ae15edd7e981eb3227ec25f7b..6b2583077fbd0222110c2b101b29940cea79e2e0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-03-05  Glenn Morris  <rgm@gnu.org>
+
+       * textmodes/tex-mode.el (tex-mode): Suppress warning about
+       multiple definitions when compiling.
+
 2008-03-04  Alan Mackenzie  <acm@muc.de>
 
        * progmodes/cc-mode.el (c-neutralize-syntax-in-CPP): Fix coding

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index ff19e60242691d9274ac19febca081528db61af0..5712eca753d24db6b3c52812e9565587fce4f526 100644 (file)
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -906,6 +906,15 @@ Inherits `shell-mode-map' with a few additions.")
 ;; and we need to define it a second time for `autoload' to get the
 ;; proper docstring.
 (defalias 'tex-mode-internal (symbol-function 'tex-mode))
+
+;; Suppress the byte-compiler warning about multiple definitions.
+;; This is a) ugly, and b) cheating, but this was the last
+;; remaining warning from byte-compiling all of Emacs...
+(eval-when-compile
+  (setq byte-compile-function-environment
+        (delq (assq 'tex-mode byte-compile-function-environment)
+              byte-compile-function-environment)))
+
 ;;;###autoload
 (defun tex-mode ()
   "Major mode for editing files of input for TeX, LaTeX, or SliTeX.