diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-09-01 21:23:17 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-09-01 21:23:17 +0000 |
| commit | 43302497711db662e8c70bd82bea8e4313d4e788 (patch) | |
| tree | 289451b23c3069b023e6f0743884bdaa285cbca0 /lisp/newcomment.el | |
| parent | 91792429d1c991791f867ce4b045d8311ba15b0c (diff) | |
| download | emacs-43302497711db662e8c70bd82bea8e4313d4e788.tar.gz | |
(comment-indent): Don't insert a fixed number of spaces.
Diffstat (limited to 'lisp/newcomment.el')
| -rw-r--r-- | lisp/newcomment.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el index e52231ed44a..2a889e6a632 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -5,7 +5,7 @@ ;; Author: code extracted from Emacs-20's simple.el ;; Maintainer: Stefan Monnier <monnier@cs.yale.edu> ;; Keywords: comment uncomment -;; Revision: $Id: newcomment.el,v 1.32 2001/08/21 18:30:59 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.33 2001/09/01 21:19:45 monnier Exp $ ;; This file is part of GNU Emacs. @@ -446,10 +446,8 @@ If CONTINUE is non-nil, use the `comment-continue' markers if any." ;; If none, insert one. (save-excursion ;; Some comment-indent-function insist on not moving comments that - ;; are in column 0, so we insert a space to avoid this special - ;; case. The check for (zerop comment-column) is used for cases - ;; where we're called from comment-indent-new-line. - (unless (zerop comment-column) (insert " ")) + ;; are in column 0, so we first go to the likely target column. + (indent-to comment-column) (setq begpos (point)) (insert starter) (setq cpos (point-marker)) |