procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix documentation of dired-aux search/replace commands

Browse source 
* lisp/dired-aux.el (dired-do-find-regexp)
(dired-do-find-regexp-and-replace): Doc fixes.  (Bug#23429)
* lisp/dired.el: Update the corresponding autoload forms.
This commit is contained in:
Eli Zaretskii 2016-05-02 22:57:06 +03:00
parent bf21c84f0d
commit ec554d7741
2 changed files with 11 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/dired-aux.el
View file

@ -2719,7 +2719,8 @@ with the command \\[tags-loop-continue]."
;;;###autoload ;;;###autoload
(defun dired-do-find-regexp (regexp) (defun dired-do-find-regexp (regexp)
"Find all matches for REGEXP in all marked files, recursively." "Find all matches for REGEXP in all marked files.
For any marked directory, all of its files are searched recursively."
(interactive "sSearch marked files (regexp): ") (interactive "sSearch marked files (regexp): ")
(require 'grep) (require 'grep)
(defvar grep-find-ignored-files) (defvar grep-find-ignored-files)
@ -2740,7 +2741,9 @@ with the command \\[tags-loop-continue]."
;;;###autoload ;;;###autoload
(defun dired-do-find-regexp-and-replace (from to) (defun dired-do-find-regexp-and-replace (from to)
"Replace matches of FROM with TO, in all marked files, recursively." "Replace matches of FROM with TO, in all marked files.
For any marked directory, matches in all of its files are replaced,
recursively."
(interactive (interactive
(let ((common (let ((common
(query-replace-read-args (query-replace-read-args

9
lisp/dired.el
View file

@ -3919,7 +3919,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
;;; Start of automatically extracted autoloads. ;;; Start of automatically extracted autoloads.
;;;### (autoloads nil "dired-aux" "dired-aux.el" "6b3eb2080834b976621adc041c42f5cc") ;;;### (autoloads nil "dired-aux" "dired-aux.el" "00fe45cfae47cace47cffc09afca6832")
;;; Generated autoloads from dired-aux.el ;;; Generated autoloads from dired-aux.el
(autoload 'dired-diff "dired-aux" "\ (autoload 'dired-diff "dired-aux" "\
@ -4423,12 +4423,15 @@ with the command \\[tags-loop-continue].
\(fn FROM TO &optional DELIMITED)" t nil) \(fn FROM TO &optional DELIMITED)" t nil)
(autoload 'dired-do-find-regexp "dired-aux" "\ (autoload 'dired-do-find-regexp "dired-aux" "\
Find all matches for REGEXP in all marked files, recursively. Find all matches for REGEXP in all marked files.
For any marked directory, all of its files are searched recursively.
\(fn REGEXP)" t nil) \(fn REGEXP)" t nil)
(autoload 'dired-do-find-regexp-and-replace "dired-aux" "\ (autoload 'dired-do-find-regexp-and-replace "dired-aux" "\
Replace matches of FROM with TO, in all marked files, recursively. Replace matches of FROM with TO, in all marked files.
For any marked directory, matches in all of its files are replaced,
recursively.
\(fn FROM TO)" t nil) \(fn FROM TO)" t nil)