aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2000-12-11 21:41:41 +0000
committerStefan Monnier2000-12-11 21:41:41 +0000
commitadf9c99461b20d75675ac0c2086874adacd7dcf7 (patch)
treec10181dca80613b5bebba878b54b072b4bab7435
parent4b0cd42df2ba0b4e30efb32743f6fd9db6f0585f (diff)
downloademacs-adf9c99461b20d75675ac0c2086874adacd7dcf7.tar.gz
emacs-adf9c99461b20d75675ac0c2086874adacd7dcf7.zip
(comment-indent-new-line): Use delete-horizontal-space
(so as to obey the field property in the minibuffer).
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/newcomment.el5
2 files changed, 5 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 635a40d30aa..3fdad5280c7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
12000-12-11 Stefan Monnier <monnier@cs.yale.edu> 12000-12-11 Stefan Monnier <monnier@cs.yale.edu>
2 2
3 * newcomment.el (comment-indent-new-line): Use delete-horizontal-space
4 (so as to obey the field property in the minibuffer).
5
3 * obsolete/c-mode.el: Moved from lisp/progmodes. 6 * obsolete/c-mode.el: Moved from lisp/progmodes.
4 * obsolete/auto-show.el: Moved from lisp. 7 * obsolete/auto-show.el: Moved from lisp.
5 * obsolete/ooutline.el: Moved from lisp/textmodes. 8 * obsolete/ooutline.el: Moved from lisp/textmodes.
diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index ec294883c4a..bbd922e5dd9 100644
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -6,7 +6,7 @@
6;; Maintainer: Stefan Monnier <monnier@cs.yale.edu> 6;; Maintainer: Stefan Monnier <monnier@cs.yale.edu>
7;; Keywords: comment uncomment 7;; Keywords: comment uncomment
8;; Version: $Name: $ 8;; Version: $Name: $
9;; Revision: $Id: newcomment.el,v 1.26 2000/11/29 05:11:01 monnier Exp $ 9;; Revision: $Id: newcomment.el,v 1.27 2000/12/06 19:54:37 fx Exp $
10 10
11;; This file is part of GNU Emacs. 11;; This file is part of GNU Emacs.
12 12
@@ -928,8 +928,7 @@ unless optional argument SOFT is non-nil."
928 (setq comin (point)))))) 928 (setq comin (point))))))
929 929
930 ;; Now we know we should auto-fill. 930 ;; Now we know we should auto-fill.
931 (delete-region (progn (skip-chars-backward " \t") (point)) 931 (delete-horizontal-space)
932 (progn (skip-chars-forward " \t") (point)))
933 (if soft (insert-and-inherit ?\n) (newline 1)) 932 (if soft (insert-and-inherit ?\n) (newline 1))
934 (if fill-prefix 933 (if fill-prefix
935 (progn 934 (progn