diff options
author | Michael Heerdegen <michael_heerdegen@web.de> | 2015-12-24 21:16:25 +0100 |
---|---|---|
committer | Michael Heerdegen <michael_heerdegen@web.de> | 2015-12-24 21:16:25 +0100 |
commit | e6fbd80f9f21e7cdb5d530f7aba138ad1dc527ab (patch) | |
tree | dd18ab43acbc37d09a049ca8107c57d4c23f481c /helm-elisp.el | |
parent | fe96a398aa09ed0d25f6782efa5833085aa63791 (diff) |
Tweak "Edit and eval" action of helm-complex-command-history
Use `edit-and-eval-command'. This should not change the behavior, but a
correct entry is added to `command-history' instead of
(eval-expression INPUT)
Diffstat (limited to 'helm-elisp.el')
-rw-r--r-- | helm-elisp.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/helm-elisp.el b/helm-elisp.el index 76415876..7ace2ff6 100644 --- a/helm-elisp.el +++ b/helm-elisp.el @@ -874,11 +874,8 @@ Filename completion happen if string start after or between a double quote." (and (boundp 'helm-sexp--last-sexp) (setq helm-sexp--last-sexp candidate)) (run-with-timer 0.1 nil #'helm-sexp-eval candidate)) - "Edit and eval" - (lambda (cand) - (minibuffer-with-setup-hook - (lambda () (insert cand)) - (call-interactively #'eval-expression)))) + "Edit and eval" (lambda (candidate) + (edit-and-eval-command "Eval: " (read candidate)))) :persistent-action #'helm-sexp-eval)) ;;;###autoload |