diff options
author | Stefan Monnier <[email protected]> | 2000-06-04 22:02:11 +0000 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2000-06-04 22:02:11 +0000 |
commit | fd9f22d8a47beb381bacd629966c340681142921 (patch) | |
tree | 5c5c1a037b5e31d2f77293690bbc00cb941ae1bc | |
parent | 6a4384e6bc07c9531cbb5730c6f977d75aa6c11e (diff) |
(comment-indent): Ignore comment-indent-hook.
-rw-r--r-- | lisp/newcomment.el | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 889f888b59..00c751a1c3 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -6,7 +6,7 @@ ;; Maintainer: Stefan Monnier <[email protected]> ;; Keywords: comment uncomment ;; Version: $Name: $ -;; Revision: $Id: newcomment.el,v 1.14 2000/05/23 20:06:10 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.15 2000/05/25 19:05:46 monnier Exp $ ;; This file is part of GNU Emacs. @@ -414,9 +414,7 @@ If CONTINUE is non-nil, use the `comment-continuation' markers if any." (goto-char begpos)) ;; Compute desired indent. (if (= (current-column) - (setq indent (funcall (or (and (boundp 'comment-indent-hook) - comment-indent-hook) - comment-indent-function)))) + (setq indent (funcall comment-indent-function))) (goto-char begpos) ;; If that's different from current, change it. (skip-chars-backward " \t") @@ -963,6 +961,13 @@ unless optional argument SOFT is non-nil." ;;; Change Log: ;; $Log: newcomment.el,v $ +;; Revision 1.15 2000/05/25 19:05:46 monnier +;; Add abundant autoload cookies. +;; (comment-style): Be careful not to depend on runtime data at compile-time. +;; (comment-indent-hook): Remove. +;; (comment-indent): Check if comment-indent-hook is bound. +;; (comment-region): Docstring fix. +;; ;; Revision 1.14 2000/05/23 20:06:10 monnier ;; (comment-make-extra-lines): Don't use `assert'. ;; |