diff options
Diffstat (limited to 'helm-eval.el')
| -rw-r--r-- | helm-eval.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/helm-eval.el b/helm-eval.el index 1b3790d9..a45e771e 100644 --- a/helm-eval.el +++ b/helm-eval.el @@ -99,9 +99,11 @@ Should take one arg: the string to display." :action '(("Copy result to kill-ring" . (lambda (candidate) (kill-new (replace-regexp-in-string - "\n" "" candidate)))) + "\n" "" candidate)) + (message "Result copied to kill-ring"))) ("copy sexp to kill-ring" . (lambda (_candidate) - (kill-new helm-input)))))) + (kill-new helm-input) + (message "Sexp copied to kill-ring")))))) (defun helm-eval-new-line-and-indent () (interactive) @@ -149,7 +151,9 @@ Should take one arg: the string to display." (calc-eval helm-pattern) (error "error")))) :nohighlight t - :action '(("Copy result to kill-ring" . kill-new)))) + :action '(("Copy result to kill-ring" . (lambda (candidate) + (kill-new candidate) + (message "Result copied to kill-ring")))))) ;;;###autoload (defun helm-eval-expression (arg) |