diff --git a/latex.el b/latex.el
--- a/latex.el
+++ b/latex.el
@@ -644,9 +644,11 @@
 			 marker))
 	(move-marker marker nil)))))
 
+(if (fboundp 'define-obsolete-variable-alias)
 (if (featurep 'xemacs)
     (define-obsolete-variable-alias 'LaTeX-after-insert-env-hooks 'LaTeX-after-insert-env-hook)
   (define-obsolete-variable-alias 'LaTeX-after-insert-env-hooks 'LaTeX-after-insert-env-hook "11.89"))
+(defvar LaTeX-after-insert-env-hooks nil))
 
 (defvar LaTeX-after-insert-env-hook nil
   "List of functions to be run at the end of `LaTeX-insert-environment'.
diff --git a/tex.el b/tex.el
--- a/tex.el
+++ b/tex.el
@@ -608,7 +608,7 @@
 
 ;;;###autoload
 (defalias 'TeX-assoc-string
-  (symbol-function  (if (featurep 'xemacs) 'assoc 'assoc-string)))
+  (symbol-function  (if (fboundp 'assoc-string) 'assoc-string 'assoc)))
 
 ;;; Documentation for Info-goto-emacs-command-node and similar