aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/lisp-mode.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 1ffc33835e9..972fe6bafc8 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -202,6 +202,8 @@
202 (setq comment-column 40) 202 (setq comment-column 40)
203 ;; Don't get confused by `;' in doc strings when paragraph-filling. 203 ;; Don't get confused by `;' in doc strings when paragraph-filling.
204 (set (make-local-variable 'comment-use-global-state) t) 204 (set (make-local-variable 'comment-use-global-state) t)
205 (make-local-variable 'comment-indent-function)
206 (setq comment-indent-function 'lisp-comment-indent)
205 (make-local-variable 'imenu-generic-expression) 207 (make-local-variable 'imenu-generic-expression)
206 (setq imenu-generic-expression lisp-imenu-generic-expression) 208 (setq imenu-generic-expression lisp-imenu-generic-expression)
207 (make-local-variable 'multibyte-syntax-as-symbol) 209 (make-local-variable 'multibyte-syntax-as-symbol)
@@ -714,7 +716,7 @@ which see."
714 (setq debug-on-error new-value)) 716 (setq debug-on-error new-value))
715 value))))) 717 value)))))
716 718
717 719;; Used for comment-indent-function in Lisp modes.
718(defun lisp-comment-indent () 720(defun lisp-comment-indent ()
719 (if (looking-at "\\s<\\s<\\s<") 721 (if (looking-at "\\s<\\s<\\s<")
720 (current-column) 722 (current-column)