summaryrefslogtreecommitdiff
path: root/lisp/simple.el
diff options
context:
space:
mode:
authorJan D <jan.h.d@swipnet.se>2010-09-02 12:54:43 +0200
committerJan D <jan.h.d@swipnet.se>2010-09-02 12:54:43 +0200
commit08d4877ef2d8c871cbbdab210ed21228687da036 (patch)
tree764de241cc961a6b91acf36f78f1d1152eb62773 /lisp/simple.el
parent30641319d8b68c3a76b8ec7b5bf850e0bbec13bb (diff)
downloademacs-08d4877ef2d8c871cbbdab210ed21228687da036.tar.gz
* simple.el (kill-new): Call interprogram-cut-function with only one argument.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r--lisp/simple.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 9ad776cad08..60d82dd3a48 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -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.