[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp-mode.el

[Richard M . Stallman]

Index: emacs/lisp/emacs-lisp/lisp-mode.el
diff -c emacs/lisp/emacs-lisp/lisp-mode.el:1.177 
emacs/lisp/emacs-lisp/lisp-mode.el:1.178
*** emacs/lisp/emacs-lisp/lisp-mode.el:1.177    Tue Jun 21 15:59:33 2005
--- emacs/lisp/emacs-lisp/lisp-mode.el  Sat Jun 25 14:10:23 2005
***************
*** 202,207 ****
--- 202,209 ----
    (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,720 ****
               (setq debug-on-error new-value))
             value)))))
  
! 
  (defun lisp-comment-indent ()
    (if (looking-at "\\s<\\s<\\s<")
        (current-column)
--- 716,722 ----
               (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)