Fix error when interprogram-cut-function unset

diff --git a/easy-kill.el b/easy-kill.el
index 30df9a2af082da4d5f7891fb3cdff9a1e789c4aa..2bd0c17bb9f01c66316f9b00436a608a39f5423b 100644 (file)
--- a/easy-kill.el
+++ b/easy-kill.el
@@ -51,7 +51,8 @@
   (when str
     (setq easy-kill-candidate str)
     ;; Immediately put it in clipboard for other applications.
-    (funcall interprogram-cut-function str)
+    (and interprogram-cut-function
+         (funcall interprogram-cut-function str))
     (easy-kill-message-nolog "%s" str)))
 
 (defun easy-kill-map ()