diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-10-20 21:22:44 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-10-20 21:22:44 +0000 |
| commit | 6e88ed495ef94b7f34b85e5239fd65f04132b219 (patch) | |
| tree | b1ba0da2d930eac0eab489c448b746ce9ddb6a8c | |
| parent | ac6895157f7baa57c6550668398a781e4e196521 (diff) | |
| download | emacs-6e88ed495ef94b7f34b85e5239fd65f04132b219.tar.gz | |
(comment-region): Do move to next line, in neg arg case.
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index b3e756c780e..3048c5139c4 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1555,7 +1555,8 @@ not end the comment. Blank lines do not get comments." (skip-chars-backward " \t") (backward-char (length ce)) (if (looking-at (regexp-quote ce)) - (delete-char (length ce)))))) + (delete-char (length ce))))) + (forward-line 1)) (if (looking-at "[ \t]*$") () (insert cs) (if (string= "" ce) () |