changeset 39079:fc69197cb76d

(comment-indent): Don't insert a fixed number of spaces.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 01 Sep 2001 21:23:17 +0000
parents 8aea6fefc072
children 6b348f80eb27
files lisp/newcomment.el
diffstat 1 files changed, 3 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/newcomment.el	Sat Sep 01 21:19:45 2001 +0000
+++ b/lisp/newcomment.el	Sat Sep 01 21:23:17 2001 +0000
@@ -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 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))