mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
(comment-indent): Don't insert a fixed number of spaces.
This commit is contained in:
parent
e036e92051
commit
567e961e9f
1 changed files with 3 additions and 5 deletions
|
|
@ -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))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue