# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1043703910 0
# Node ID a144c40bb9841579a6728ad98ae651da35410156
# Parent  c52c622747cabe346619e99c7c6c93209f059bb5
(insert-for-yank): Remove COMMAND element from yank handler.

diff -r c52c622747ca -r a144c40bb984 lisp/subr.el
--- a/lisp/subr.el	Mon Jan 27 21:44:48 2003 +0000
+++ b/lisp/subr.el	Mon Jan 27 21:45:10 2003 +0000
@@ -1467,7 +1467,7 @@
 If STRING has a non-nil `yank-handler' property on the first character,
 the normal insert behaviour is modified in various ways.  The value of
 the yank-handler property must be a list with one to five elements
-with the following format:  (FUNCTION PARAM NOEXCLUDE UNDO COMMAND).
+with the following format:  (FUNCTION PARAM NOEXCLUDE UNDO).
 When FUNCTION is present and non-nil, it is called instead of `insert'
  to insert the string.  FUNCTION takes one argument--the object to insert.
 If PARAM is present and non-nil, it replaces STRING as the object
@@ -1481,11 +1481,7 @@
 If UNDO is present and non-nil, it is a function that will be called
  by `yank-pop' to undo the insertion of the current object.  It is
  called with two arguments, the start and end of the current region. 
- FUNCTION may set `yank-undo-function' to override the UNDO value.
-If COMMAND is present and non-nil, `this-command' is set to COMMAND
- after calling FUNCTION (or insert).  Note that setting `this-command'
- to a value different from `yank' will prevent `yank-pop' from undoing
- this yank."
+ FUNCTION may set `yank-undo-function' to override the UNDO value."
   (let* ((handler (and (stringp string)
 		       (get-text-property 0 'yank-handler string)))
 	 (param (or (nth 1 handler) string))