summaryrefslogtreecommitdiff
path: root/.config/emacs
diff options
context:
space:
mode:
Diffstat (limited to '.config/emacs')
-rw-r--r--.config/emacs/editing.el14
1 files changed, 8 insertions, 6 deletions
diff --git a/.config/emacs/editing.el b/.config/emacs/editing.el
index 644c7b7..14f87f1 100644
--- a/.config/emacs/editing.el
+++ b/.config/emacs/editing.el
@@ -212,11 +212,13 @@ If `consult' is available than this command instead calls
`consult-yank-from-kill-ring' when called with non-nil ARG."
(declare (interactive-only t))
(interactive "*P")
- (cond ((null arg)
- (yank))
- ((featurep 'consult)
- (call-interactively #'consult-yank-from-kill-ring))
- (t
- (call-interactively #'yank-from-kill-ring))))
+ ;; Avoid ‘current-prefix-arg’ cascading down to ‘yank-from-kill-ring’
+ (let (current-prefix-arg)
+ (cond ((null arg)
+ (yank))
+ ((featurep 'consult)
+ (call-interactively #'consult-yank-from-kill-ring))
+ (t
+ (call-interactively #'yank-from-kill-ring)))))
(provide 'editing)