aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/xref.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index 623c9c4e07f..80cdcb3f18b 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -928,12 +928,14 @@ IGNORES is a list of glob patterns."
928 files 928 files
929 (expand-file-name dir) 929 (expand-file-name dir)
930 ignores)) 930 ignores))
931 (def default-directory)
931 (buf (get-buffer-create " *xref-grep*")) 932 (buf (get-buffer-create " *xref-grep*"))
932 (`(,grep-re ,file-group ,line-group . ,_) (car grep-regexp-alist)) 933 (`(,grep-re ,file-group ,line-group . ,_) (car grep-regexp-alist))
933 (status nil) 934 (status nil)
934 (hits nil)) 935 (hits nil))
935 (with-current-buffer buf 936 (with-current-buffer buf
936 (erase-buffer) 937 (erase-buffer)
938 (setq default-directory def)
937 (setq status 939 (setq status
938 (call-process-shell-command command nil t)) 940 (call-process-shell-command command nil t))
939 (goto-char (point-min)) 941 (goto-char (point-min))