martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Stefan Monnier
2001-09-01 21:19:45 +00:00
parent 75c911eb15
commit e036e92051
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/newcomment.el
View File

@@ -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.31 2001/03/02 20:31:40 monnier Exp $
;; Revision: $Id: newcomment.el,v 1.32 2001/08/21 18:30:59 monnier Exp $
;; This file is part of GNU Emacs.
@@ -446,8 +446,10 @@ 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
(insert " ")
;; 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 " "))
(setq begpos (point))
(insert starter)
(setq cpos (point-marker))