lisp-mode-variables uses lisp-mode-syntax-table

All core modes that weren't interested overwrite it anyway for
emacs-lisp.  And third party usage of this functions (in SLIME/SLY)
wants the lisp-mode-syntax-table anyway.

* lisp/emacs-lisp/lisp-mode.el (lisp-mode-variables): Use
lisp-mode-syntax-table by default.

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 18f35b69b34ddb7c315e0109805b99237a6a7f66..13263f2fb509527fc6d7a0296a29ff8a8bffa2a2 100644 (file)
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -614,6 +614,7 @@ Value for `adaptive-fill-function'."
 (defun lisp-mode-variables (&rest ignored)
   "Common initialization routine for lisp modes.
 Any number of parameters is accepted and ignored."
+  (set-syntax-table lisp-mode-syntax-table)
   (setq-local paragraph-ignore-fill-prefix t)
   (setq-local fill-paragraph-function 'lisp-fill-paragraph)
   (setq-local adaptive-fill-function #'lisp-adaptive-fill)
@@ -651,7 +652,6 @@ Any number of parameters is accepted and ignored."
   "Major mode for buffers holding data written in Lisp syntax."
   :group 'lisp
   (lisp-mode-variables)
-  (set-syntax-table lisp-mode-syntax-table)
   (setq-local electric-quote-string t)
   (setq imenu-case-fold-search nil))
 

diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index aa6c7180413a1d5ad792c69bf7f83e8a5875fc85..fca803be18abfa560278a2c6f9b3db0113ee3e54 100644 (file)
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -274,7 +274,6 @@ If you accidentally suspend your process, use \\[comint-continue-subjob]
 to continue it."
   (setq comint-prompt-regexp inferior-lisp-prompt)
   (setq mode-line-process '(":%s"))
-  (set-syntax-table lisp-mode-syntax-table)
   (lisp-mode-variables)
   (setq comint-get-old-input (function lisp-get-old-input))
   (setq comint-input-filter (function lisp-input-filter)))