aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/dired-aux.el8
-rw-r--r--lisp/term/xterm.el3
-rw-r--r--src/buffer.c5
3 files changed, 12 insertions, 4 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 94a2bbf1f34..26155190d47 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -3140,7 +3140,13 @@ REGEXP should use constructs supported by your local `grep' command."
3140 (query-replace-read-args 3140 (query-replace-read-args
3141 "Query replace regexp in marked files" t t))) 3141 "Query replace regexp in marked files" t t)))
3142 (list (nth 0 common) (nth 1 common)))) 3142 (list (nth 0 common) (nth 1 common))))
3143 (with-current-buffer (dired-do-find-regexp from) 3143 (require 'xref)
3144 (defvar xref-show-xrefs-function)
3145 (with-current-buffer
3146 (let ((xref-show-xrefs-function
3147 ;; Some future-proofing (bug#44905).
3148 (eval (car (get 'xref-show-xrefs-function 'standard-value)))))
3149 (dired-do-find-regexp from))
3144 (xref-query-replace-in-results from to))) 3150 (xref-query-replace-in-results from to)))
3145 3151
3146(defun dired-nondirectory-p (file) 3152(defun dired-nondirectory-p (file)
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el
index 1a727e3933e..709410064b1 100644
--- a/lisp/term/xterm.el
+++ b/lisp/term/xterm.el
@@ -767,7 +767,8 @@ Can be nil to mean \"no timeout\".")
767By not redisplaying right away for xterm queries, we can avoid 767By not redisplaying right away for xterm queries, we can avoid
768unsightly flashing during initialization. Give up and redisplay 768unsightly flashing during initialization. Give up and redisplay
769anyway if we've been waiting a little while." 769anyway if we've been waiting a little while."
770 (let ((start-time (current-time))) 770 (let ((start-time (current-time))
771 (inhibit--record-char t))
771 (or (let ((inhibit-redisplay t)) 772 (or (let ((inhibit-redisplay t))
772 (read-event nil nil xterm-query-redisplay-timeout)) 773 (read-event nil nil xterm-query-redisplay-timeout))
773 (read-event nil nil 774 (read-event nil nil
diff --git a/src/buffer.c b/src/buffer.c
index 360dd348e05..4215acbf1df 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -62,8 +62,9 @@ struct buffer buffer_defaults;
62 62
63/* This structure marks which slots in a buffer have corresponding 63/* This structure marks which slots in a buffer have corresponding
64 default values in buffer_defaults. 64 default values in buffer_defaults.
65 Each such slot has a nonzero value in this structure. 65 Each such slot has a value in this structure.
66 The value has only one nonzero bit. 66 The value is a positive Lisp integer that must be smaller than
67 MAX_PER_BUFFER_VARS.
67 68
68 When a buffer has its own local value for a slot, 69 When a buffer has its own local value for a slot,
69 the entry for that slot (found in the same slot in this structure) 70 the entry for that slot (found in the same slot in this structure)