diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-11-29 05:11:01 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-11-29 05:11:01 +0000 |
commit | bb49bea2cd659e17a9f083b32f962d9af2042fc9 (patch) | |
tree | 2d7bd610cb65b63c0fbc2bc64a9a9c910747694b /lisp/newcomment.el | |
parent | 8f1cbed0ab5505c25e4b928240959d7bfe635050 (diff) | |
download | emacs-bb49bea2cd659e17a9f083b32f962d9af2042fc9.tar.gz |
(comment-indent): Save excursion around call to comment-indent-function.
Diffstat (limited to 'lisp/newcomment.el')
-rw-r--r-- | lisp/newcomment.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 3466b429301..610831bcff0 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -6,7 +6,7 @@ ;; Maintainer: Stefan Monnier <monnier@cs.yale.edu> ;; Keywords: comment uncomment ;; Version: $Name: $ -;; Revision: $Id: newcomment.el,v 1.24 2000/11/14 15:09:40 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.25 2000/11/21 21:31:16 monnier Exp $ ;; This file is part of GNU Emacs. @@ -436,7 +436,7 @@ If CONTINUE is non-nil, use the `comment-continuation' markers if any." (insert ender))) (goto-char begpos) ;; Compute desired indent. - (setq indent (funcall comment-indent-function)) + (setq indent (save-excursion (funcall comment-indent-function))) (if (not indent) ;; comment-indent-function refuses delegates to indent. (indent-according-to-mode) |