[elpa] 02/77: Fix error when interprogram-cut-function unset

[Leo Liu]

leoliu pushed a commit to branch master
in repository elpa.

commit 0d26d776b57f96751adace328863e3765764be5f
Author: Leo Liu <address@hidden>
Date:   Sat Sep 28 12:19:42 2013 +0800

    Fix error when interprogram-cut-function unset
---
 easy-kill.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/easy-kill.el b/easy-kill.el
index 30df9a2..2bd0c17 100644
--- 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 ()