[Emacs-diffs] /srv/bzr/emacs/trunk r101301: * simple.el (kill-new): Call interprogram-cut-function with only one argument.

[Jan D]

------------------------------------------------------------
revno: 101301
committer: Jan D <address@hidden>
branch nick: trunk
timestamp: Thu 2010-09-02 12:54:43 +0200
message:
  * simple.el (kill-new): Call interprogram-cut-function with only one argument.
modified:
  lisp/ChangeLog
  lisp/simple.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-09-02 10:17:02 +0000
+++ b/lisp/ChangeLog    2010-09-02 10:54:43 +0000
@@ -1,5 +1,8 @@
 2010-09-02  Jan Djärv  <address@hidden>
 
+       * 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.
 

=== modified file 'lisp/simple.el'
--- a/lisp/simple.el    2010-09-02 09:47:08 +0000
+++ b/lisp/simple.el    2010-09-02 10:54:43 +0000
@@ -3047,7 +3047,7 @@
          (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.