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

2 files changed, 14 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cba58f8fb2e..6b2583077fb 100644
--- 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 ff19e602426..5712eca753d 100644
--- 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.