[Emacs-diffs] trunk r115578: * simple.el (append-next-kill): Doc fix (Bug#15995, Bug#16016).

[Chong Yidong]

------------------------------------------------------------
revno: 115578
revision-id: address@hidden
parent: address@hidden
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Wed 2013-12-18 10:43:47 +0800
message:
  * simple.el (append-next-kill): Doc fix (Bug#15995, Bug#16016).
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/simple.el                 simple.el-20091113204419-o5vbwnq5f7feedwu-403

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-18 01:03:07 +0000
+++ b/lisp/ChangeLog    2013-12-18 02:43:47 +0000
@@ -1,3 +1,7 @@
+2013-12-18  Chong Yidong  <address@hidden>
+
+       * simple.el (append-next-kill): Doc fix (Bug#15995, Bug#16016).
+
 2013-12-18  Glenn Morris  <address@hidden>
 
        * mail/emacsbug.el (report-emacs-bug):

=== modified file 'lisp/simple.el'
--- a/lisp/simple.el    2013-12-17 15:48:26 +0000
+++ b/lisp/simple.el    2013-12-18 02:43:47 +0000
@@ -3764,7 +3764,17 @@
                   (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.