Commit 08d4877e authored by Jan D's avatar Jan D

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

parent 30641319
2010-09-02 Jan Djärv <jan.h.d@swipnet.se> 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. * term.el (term-mouse-paste): Don't call x-get-cutbuffer.
Remove cut buffer from error message. Remove cut buffer from error message.
......
...@@ -3047,7 +3047,7 @@ argument should still be a \"useful\" string for such uses." ...@@ -3047,7 +3047,7 @@ argument should still be a \"useful\" string for such uses."
(setcdr (nthcdr (1- kill-ring-max) kill-ring) nil)))) (setcdr (nthcdr (1- kill-ring-max) kill-ring) nil))))
(setq kill-ring-yank-pointer kill-ring) (setq kill-ring-yank-pointer kill-ring)
(if interprogram-cut-function (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) (defun kill-append (string before-p &optional yank-handler)
"Append STRING to the end of the latest kill in the kill ring. "Append STRING to the end of the latest kill in the kill ring.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment