(dired-get-filename): Don't use dired-re-dot.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 26d6ba248d731ab96bcd725eb3b9f85944f34a36..d23005ed0bdc92c764c7db4492399ecab010d0e2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-05-30  Andreas Schwab  <schwab@suse.de>
+
+       * dired.el (dired-get-filename): Don't use dired-re-dot.
+
 2004-05-30  Richard M. Stallman  <rms@gnu.org>
 
        * files.el (find-file): Doc fix.

diff --git a/lisp/dired.el b/lisp/dired.el
index 8bdfe1befcef124e8dab682a70cbe3921582f5b3..3d4491cc819b5ea00e98cd22653c4eccf32d5e40 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1634,9 +1634,7 @@ Otherwise, an error occurs in these cases."
      ((eq localp 'verbatim)
       file)
      ((and (not no-error-if-not-filep)
-          (save-excursion
-            (beginning-of-line)
-            (looking-at dired-re-dot)))
+          (member file '("." "..")))
       (error "Cannot operate on `.' or `..'"))
      ((and (eq localp 'no-dir) already-absolute)
       (file-name-nondirectory file))