diff options
| -rw-r--r-- | lisp/progmodes/xref.el | 4 |
1 files 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)))) |