From: Juri Linkov <juri@linkov.net>
Date: Fri, 14 Jan 2022 08:18:43 +0000 (+0200)
Subject: * lisp/progmodes/xref.el (xref-query-replace-in-results): Fix prefix-arg.
X-Git-Tag: emacs-29.0.90~3070
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=102dd6e59bcc49bab669ff35512e4d2008f34cde;p=emacs.git

* lisp/progmodes/xref.el (xref-query-replace-in-results): Fix prefix-arg.

Use current-prefix-arg.
---

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index a1e976cb1cc..066c051cfc3 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -745,10 +745,10 @@ replace the whole name.  Unless called with prefix argument, in
 which case the user is prompted for both FROM and TO."
   (interactive
    (let* ((fr
-           (if prefix-arg
+           (if current-prefix-arg
                (read-regexp "Query-replace (regexp)" ".*")
              ".*"))
-          (prompt (if prefix-arg
+          (prompt (if current-prefix-arg
                       (format "Query-replace (regexp) %s with: " fr)
                     "Query-replace all matches with: ")))
      (list fr (read-regexp prompt))))