From b6552b1d7c5e6eb66b7b641efa3a0fe175fb7eba Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Mon, 29 Mar 2021 22:34:51 +0300 Subject: [PATCH] * lisp/progmodes/project.el (project-regexp-history-variable): New variable. (project--read-regexp): Use it as HISTORY arg of 'read-regexp' with 'grep-regexp-history' default (bug#47012). --- lisp/progmodes/project.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index f1546541d54..4101962f06a 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -782,9 +782,12 @@ pattern to search for." (user-error "No matches for: %s" regexp)) xrefs)) +(defvar project-regexp-history-variable 'grep-regexp-history) + (defun project--read-regexp () (let ((sym (thing-at-point 'symbol t))) - (read-regexp "Find regexp" (and sym (regexp-quote sym))))) + (read-regexp "Find regexp" (and sym (regexp-quote sym)) + project-regexp-history-variable))) ;;;###autoload (defun project-find-file () -- 2.39.2