From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 25 Jun 2005 14:10:23 +0000 (+0000)
Subject: (lisp-mode-variables): Bind comment-indent-function locally.
X-Git-Tag: emacs-pretest-22.0.90~8645
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e3034a95bce31f347a8738452cb9fb7ae8aa4e33;p=emacs.git

(lisp-mode-variables): Bind comment-indent-function locally.
---

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 @@
   (setq comment-column 40)
   ;; Don't get confused by `;' in doc strings when paragraph-filling.
   (set (make-local-variable 'comment-use-global-state) t)
+  (make-local-variable 'comment-indent-function)
+  (setq comment-indent-function 'lisp-comment-indent)
   (make-local-variable 'imenu-generic-expression)
   (setq imenu-generic-expression lisp-imenu-generic-expression)
   (make-local-variable 'multibyte-syntax-as-symbol)
@@ -714,7 +716,7 @@ which see."
 	       (setq debug-on-error new-value))
 	     value)))))
 
-
+;; Used for comment-indent-function in Lisp modes.
 (defun lisp-comment-indent ()
   (if (looking-at "\\s<\\s<\\s<")
       (current-column)