Fix use of prefix arg in consult-ripgrep wrapper

Fixes #866 Thanks @wangdiqi
purcell · Nov 3, 2024 · d45c7cc · d45c7cc
1 parent d40ad68
commit d45c7cc
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lisp/init-minibuffer.el b/lisp/init-minibuffer.el
@@ -24,8 +24,8 @@
 
     (when (and (executable-find "rg"))
       (defun sanityinc/consult-ripgrep-at-point (&optional dir initial)
-        (interactive (list prefix-arg (when-let ((s (symbol-at-point)))
-                                        (symbol-name s))))
+        (interactive (list current-prefix-arg (when-let ((s (symbol-at-point)))
+                                                (symbol-name s))))
         (consult-ripgrep dir initial))
       (sanityinc/no-consult-preview sanityinc/consult-ripgrep-at-point)
       (global-set-key (kbd "M-?") 'sanityinc/consult-ripgrep-at-point))