diff options
| author | Glenn Morris <rgm@gnu.org> | 2014-03-22 16:56:19 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2014-03-22 16:56:19 -0700 |
| commit | 5dbc3244732d3eb33809304f8d887f943cde780d (patch) | |
| tree | 831f82b12d2bee6f1747b3f1468dd11ab13aba6f /lisp/dired-x.el | |
| parent | 00156f954984c1084180ca87832fcd32f05aa327 (diff) | |
| download | emacs-5dbc3244732d3eb33809304f8d887f943cde780d.tar.gz | |
Make dired-read-regexp obsolete
It's not worth having such a trivial wrapper for read-regexp.
* lisp/dired.el (dired-read-regexp): Make obsolete.
(dired-mark-files-regexp, dired-mark-files-containing-regexp)
(dired-flag-files-regexp):
* lisp/dired-aux.el (dired-mark-read-regexp):
* lisp/dired-x.el (dired-mark-unmarked-files): Use read-regexp directly.
Diffstat (limited to 'lisp/dired-x.el')
| -rw-r--r-- | lisp/dired-x.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 947de7cd9f8..25c6f8b69af 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -1,7 +1,6 @@ ;;; dired-x.el --- extra Dired functionality -*- lexical-binding:t -*- -;; Copyright (C) 1993-1994, 1997, 2001-2014 Free Software Foundation, -;; Inc. +;; Copyright (C) 1993-1994, 1997, 2001-2014 Free Software Foundation, Inc. ;; Author: Sebastian Kremer <sk@thp.uni-koeln.de> ;; Lawrence R. Dodd <dodd@roebling.poly.edu> @@ -556,8 +555,9 @@ interactively, prompt for REGEXP. With prefix argument, unflag all those files. Optional fourth argument LOCALP is as in `dired-get-filename'." (interactive - (list (dired-read-regexp - "Mark unmarked files matching regexp (default all): ") + (list (read-regexp + "Mark unmarked files matching regexp (default all): " + nil 'dired-regexp-history) nil current-prefix-arg nil)) (let ((dired-marker-char (if unflag-p ?\s dired-marker-char))) (dired-mark-if |