X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/0808f2a1a331fbcb2e6ab57894502b0a34311869..1a5d0c15185986e645e8fb8080a2338d8f17d562:/lisp/dired.el diff --git a/lisp/dired.el b/lisp/dired.el index 2a65bd09cc..d078478aaa 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -303,7 +303,7 @@ The directory name must be absolute, but need not be fully expanded.") (put 'dired-actual-switches 'safe-local-variable 'dired-safe-switches-p) -(defvar dired-re-inode-size "[0-9 \t]*" +(defvar dired-re-inode-size "[0-9 \t]*[.,0-9]*[BkKMGTPEZY]?[ \t]*" "Regexp for optional initial inode and file size as made by `ls -i -s'.") ;; These regexps must be tested at beginning-of-line, but are also @@ -3357,7 +3357,12 @@ object files--just `.o' will mark more than you might think." (defun dired-mark-files-containing-regexp (regexp &optional marker-char) "Mark all files with contents containing REGEXP for use in later commands. A prefix argument means to unmark them instead. -`.' and `..' are never marked." +`.' and `..' are never marked. + +Note that if a file is visited in an Emacs buffer, this command will +look in the buffer without revisiting the file, so the results might +be inconsistent with the file on disk if its contents has changed +since it was last visited." (interactive (list (read-regexp (concat (if current-prefix-arg "Unmark" "Mark") " files containing (regexp): ")