From 102dd6e59bcc49bab669ff35512e4d2008f34cde Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Fri, 14 Jan 2022 10:18:43 +0200 Subject: [PATCH] * lisp/progmodes/xref.el (xref-query-replace-in-results): Fix prefix-arg. Use current-prefix-arg. --- lisp/progmodes/xref.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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)))) -- 2.39.2