mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-05-10 23:31:19 -07:00
Code Issues Projects Releases Wiki Activity

* simple.el (kill-new): Call interprogram-cut-function with only one argument.

Browse source
This commit is contained in:
Jan D 2010-09-02 12:54:43 +02:00
parent 30641319d8
commit 08d4877ef2
2 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2010-09-02 Jan Djärv <jan.h.d@swipnet.se>
* simple.el (kill-new): Call interprogram-cut-function with only
one argument.
* term.el (term-mouse-paste): Don't call x-get-cutbuffer.
Remove cut buffer from error message.

2
lisp/simple.el
View file

@ -3047,7 +3047,7 @@ argument should still be a \"useful\" string for such uses."
(setcdr (nthcdr (1- kill-ring-max) kill-ring) nil))))
(setq kill-ring-yank-pointer kill-ring)
(if interprogram-cut-function
(funcall interprogram-cut-function string (not replace))))
(funcall interprogram-cut-function string)))
(defun kill-append (string before-p &optional yank-handler)
"Append STRING to the end of the latest kill in the kill ring.