procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remember: If region is visible, use it as initial text.

Browse source
This commit is contained in:
Michael Olson 2008-01-08 01:33:08 +00:00
parent 429e6fb63d
commit 043989e335
2 changed files with 18 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lisp/ChangeLog
View file

@ -1,3 +1,15 @@
2008-01-08 Michael Olson <mwolson@gnu.org>
* textmodes/remember.el (remember-region): Fix typo in docstring.
2008-01-08 Lennart Borgman <lennart.borgman.073@student.lu.se>
* textmodes/remember.el (remember): If there is a visible region
[that is, the mark is active and transient mark mode is enabled]
then use this region for the initial contents of the *Remember*
buffer. Use `region-beginning' and `region-end' instead of
`point' and `mark'.
2008-01-07 Dan Nicolaescu <dann@ics.uci.edu>
* vc-hg.el (vc-hg-dir-state, vc-hg-dir-status): Pass the dir

10
lisp/textmodes/remember.el
View file

@ -273,10 +273,12 @@ called."
INITIAL is the text to initially place in the *Remember* buffer,
or nil to bring up a blank *Remember* buffer.
With a prefix, use the region as INITIAL."
With a prefix or a visible region, use the region as INITIAL."
(interactive
(list (when current-prefix-arg
(buffer-substring (point) (mark)))))
(list (when (or current-prefix-arg
(and mark-active
transient-mark-mode))
(buffer-substring (region-beginning) (region-end)))))
(funcall (if remember-in-new-frame
#'frame-configuration-to-register
#'window-configuration-to-register) remember-register)
@ -422,7 +424,7 @@ Subject: %s\n\n"
(defun remember-region (&optional beg end)
"Remember the data from BEG to END.
It is called from within the *Remember* buffer to save the text
that was entered,
that was entered.
If BEG and END are nil, the entire buffer will be remembered.