Mercurial > emacs
changeset 53931:bfe6c29e5283
(kill-new): Put yank-handler property on the entire string.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Fri, 13 Feb 2004 23:09:46 +0000 |
| parents | 5ef587160656 |
| children | cf4f19cf90c4 |
| files | lisp/simple.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Thu Feb 12 17:04:42 2004 +0000 +++ b/lisp/simple.el Fri Feb 13 23:09:46 2004 +0000 @@ -1842,7 +1842,8 @@ argument should still be a \"useful\" string for such uses." (if (> (length string) 0) (if yank-handler - (put-text-property 0 1 'yank-handler yank-handler string)) + (put-text-property 0 (length string) + 'yank-handler yank-handler string)) (if yank-handler (signal 'args-out-of-range (list string "yank-handler specified for empty string"))))