mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 02:51:31 -08:00
Code Issues Projects Releases Wiki Activity

* simple.el (append-next-kill): Doc fix (Bug#15995, Bug#16016).

Browse source
This commit is contained in:
Chong Yidong 2013-12-18 10:43:47 +08:00
parent 9cdb8d8556
commit 33f5d4c15a
2 changed files with 15 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/simple.el
View file

@ -3764,7 +3764,17 @@ of this sample text; it defaults to 40."
(buffer-substring-no-properties mark (+ mark len))))))))
(defun append-next-kill (&optional interactive)
"Cause following command, if it kills, to append to previous kill.
"Cause following command, if it kills, to add to previous kill.
If the next command kills forward from point, the kill is
appended to the previous killed text. If the command kills
backward, the kill is prepended. Kill commands that act on the
region, such as `kill-region', are regarded as killing forward if
point is after mark, and killing backward if point is before
mark.
If the next command is not a kill command, `append-next-kill' has
no effect.
The argument is used for internal purposes; do not supply one."
(interactive "p")
;; We don't use (interactive-p), since that breaks kbd macros.