master 6cc99102272 1/3: Make dired-move-to-filename-regexp obsolete

[Stefan Kangas]

branch: master
commit 6cc9910227212490a451aeb16325a7e27eeb998c
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Make dired-move-to-filename-regexp obsolete
    
    * lisp/dired.el (dired-move-to-filename-regexp): Make Emacs 21
    compatibility alias obsolete.
---
 lisp/dired.el | 6 +++---
 lisp/files.el | 1 -
 2 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/lisp/dired.el b/lisp/dired.el
index 255d79fa42c..fcbecbf3c08 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -577,9 +577,6 @@ element, for the listed directory.")
   "Keeps track of which switches to use for inserted subdirectories.
 This is an alist of the form (SUBDIR . SWITCHES).")
 
-(defvaralias 'dired-move-to-filename-regexp
-  'directory-listing-before-filename-regexp)
-
 (defvar dired-subdir-regexp "^. \\(.+\\)\\(:\\)\n"
   "Regexp matching a maybe hidden subdirectory line in `ls -lR' output.
 Subexpression 1 is the subdirectory proper, no trailing colon.
@@ -5040,6 +5037,9 @@ completes."
   ;; Redisplay the tool bar.
   (force-mode-line-update))
 
+(define-obsolete-variable-alias 'dired-move-to-filename-regexp
+  'directory-listing-before-filename-regexp "30.1")
+
 (provide 'dired)
 
 (run-hooks 'dired-load-hook)           ; for your customizations
diff --git a/lisp/files.el b/lisp/files.el
index 69c4a33cdeb..52cf03ee085 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -7743,7 +7743,6 @@ If DIR's free space cannot be obtained, this function 
returns nil."
       (if avail
           (funcall byte-count-to-string-function avail)))))
 
-;; The following expression replaces `dired-move-to-filename-regexp'.
 (defvar directory-listing-before-filename-regexp
   (let* ((l "\\([A-Za-z]\\|[^\0-\177]\\)")
         (l-or-quote "\\([A-Za-z']\\|[^\0-\177]\\)")