[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el |
Date: |
Tue, 09 Aug 2005 17:38:24 -0400 |
Index: emacs/lisp/dired-aux.el
diff -c emacs/lisp/dired-aux.el:1.136 emacs/lisp/dired-aux.el:1.137
*** emacs/lisp/dired-aux.el:1.136 Sat Aug 6 22:13:42 2005
--- emacs/lisp/dired-aux.el Tue Aug 9 21:38:24 2005
***************
*** 2208,2214 ****
If you exit (\\[keyboard-quit], RET or q), you can resume the query replace
with the command \\[tags-loop-continue]."
(interactive
! "sQuery replace in marked files (regexp): \nsQuery replace %s by: \nP")
(dolist (file (dired-get-marked-files nil nil 'dired-nondirectory-p))
(let ((buffer (get-file-buffer file)))
(if (and buffer (with-current-buffer buffer
--- 2208,2217 ----
If you exit (\\[keyboard-quit], RET or q), you can resume the query replace
with the command \\[tags-loop-continue]."
(interactive
! (let ((common
! (query-replace-read-args
! "Query replace regexp in marked files" t t)))
! (list (nth 0 common) (nth 1 common) (nth 2 common))))
(dolist (file (dired-get-marked-files nil nil 'dired-nondirectory-p))
(let ((buffer (get-file-buffer file)))
(if (and buffer (with-current-buffer buffer