aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Schwab2004-05-30 18:24:08 +0000
committerAndreas Schwab2004-05-30 18:24:08 +0000
commit5709c1a0bfc7b7e1248d410035a476ec64ae3d00 (patch)
treec760c9bb346cf1c9a8214ecb3bd9927bc528e9bb
parent7a61e456bacc0461e7c97aaf8f60fcc10a118a7c (diff)
downloademacs-5709c1a0bfc7b7e1248d410035a476ec64ae3d00.tar.gz
emacs-5709c1a0bfc7b7e1248d410035a476ec64ae3d00.zip
(dired-get-filename): Don't use dired-re-dot.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/dired.el4
2 files changed, 5 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 26d6ba248d7..d23005ed0bd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12004-05-30 Andreas Schwab <schwab@suse.de>
2
3 * dired.el (dired-get-filename): Don't use dired-re-dot.
4
12004-05-30 Richard M. Stallman <rms@gnu.org> 52004-05-30 Richard M. Stallman <rms@gnu.org>
2 6
3 * files.el (find-file): Doc fix. 7 * files.el (find-file): Doc fix.
diff --git a/lisp/dired.el b/lisp/dired.el
index 8bdfe1befce..3d4491cc819 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1634,9 +1634,7 @@ Otherwise, an error occurs in these cases."
1634 ((eq localp 'verbatim) 1634 ((eq localp 'verbatim)
1635 file) 1635 file)
1636 ((and (not no-error-if-not-filep) 1636 ((and (not no-error-if-not-filep)
1637 (save-excursion 1637 (member file '("." "..")))
1638 (beginning-of-line)
1639 (looking-at dired-re-dot)))
1640 (error "Cannot operate on `.' or `..'")) 1638 (error "Cannot operate on `.' or `..'"))
1641 ((and (eq localp 'no-dir) already-absolute) 1639 ((and (eq localp 'no-dir) already-absolute)
1642 (file-name-nondirectory file)) 1640 (file-name-nondirectory file))