diff options
Diffstat (limited to 'helm-ring.el')
| -rw-r--r-- | helm-ring.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/helm-ring.el b/helm-ring.el index ef3d5254..29beef0a 100644 --- a/helm-ring.el +++ b/helm-ring.el @@ -155,7 +155,7 @@ use `helm-kill-ring-separator' as default." (cl-loop for c in (butlast marked) concat (concat c sep) into str finally return (concat str (car (last marked))))))) - + (defun helm-kill-ring-action-yank-1 (str) "Insert STR in `kill-ring' and set STR to the head. @@ -535,6 +535,7 @@ This command is useful when used with persistent action." (defun helm-kbd-macro-delete-macro (_candidate) (let ((mkd (helm-marked-candidates))) + (kmacro-push-ring) (cl-loop for km in mkd do (setq kmacro-ring (delete km kmacro-ring))) (kmacro-pop-ring1))) |