1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

* newcomment.el (comment-region): Doc fix (Bug#3370).

This commit is contained in:
Chong Yidong 2009-05-26 03:16:31 +00:00
parent ae98e41f94
commit 707f4689ea
2 changed files with 13 additions and 5 deletions

View File

@ -1,3 +1,7 @@
2009-05-26 Chong Yidong <cyd@stupidchicken.com>
* newcomment.el (comment-region): Doc fix (Bug#3370).
2009-05-24 Roland Winkler <Roland.Winkler@physik.uni-erlangen.de> 2009-05-24 Roland Winkler <Roland.Winkler@physik.uni-erlangen.de>
* mail/smtpmail.el: Indent code properly to make it more readable. * mail/smtpmail.el: Indent code properly to make it more readable.

View File

@ -1046,12 +1046,16 @@ the region rather than at left margin."
With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END. With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END.
Numeric prefix ARG means use ARG comment characters. Numeric prefix ARG means use ARG comment characters.
If ARG is negative, delete that many comment characters instead. If ARG is negative, delete that many comment characters instead.
By default, comments start at the left margin, are terminated on each line,
even for syntax in which newline does not end the comment and blank lines
do not get comments. This can be changed with `comment-style'.
The strings used as comment starts are built from The strings used as comment starts are built from `comment-start'
`comment-start' without trailing spaces and `comment-padding'." and `comment-padding'; the strings used as comment ends are built
from `comment-end' and `comment-padding'.
By default, the `comment-start' markers are inserted at the
current indentation of the region, and comments are terminated on
each line (even for syntaxes in which newline does not end the
comment and blank lines do not get comments). This can be
changed with `comment-style'."
(interactive "*r\nP") (interactive "*r\nP")
(comment-normalize-vars) (comment-normalize-vars)
(if (> beg end) (let (mid) (setq mid beg beg end end mid))) (if (> beg end) (let (mid) (setq mid beg beg end end mid)))