diff options
| author | Luc Teirlinck | 2004-07-14 22:59:08 +0000 |
|---|---|---|
| committer | Luc Teirlinck | 2004-07-14 22:59:08 +0000 |
| commit | ca02a7263d2e5f26ef975661638d0044b24fa9a3 (patch) | |
| tree | 5fb255a7c4ee2ce721f07839634c1a6b05fd0853 | |
| parent | e5fcddc8f856ed141b374a7b3787ef4cf2718a30 (diff) | |
| download | emacs-ca02a7263d2e5f26ef975661638d0044b24fa9a3.tar.gz emacs-ca02a7263d2e5f26ef975661638d0044b24fa9a3.zip | |
(dired-directory-changed-p): `visited-file-modtime' now returns a
list of two integers, instead of a cons.
| -rw-r--r-- | lisp/dired.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index e5e23dfe2d6..43eec9408d4 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -620,8 +620,7 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh." | |||
| 620 | (modtime (visited-file-modtime))) | 620 | (modtime (visited-file-modtime))) |
| 621 | (or (eq modtime 0) | 621 | (or (eq modtime 0) |
| 622 | (not (eq (car attributes) t)) | 622 | (not (eq (car attributes) t)) |
| 623 | (and (= (car (nth 5 attributes)) (car modtime)) | 623 | (equal (nth 5 attributes) modtime))))) |
| 624 | (= (nth 1 (nth 5 attributes)) (cdr modtime))))))) | ||
| 625 | 624 | ||
| 626 | (defun dired-buffer-stale-p (&optional noconfirm) | 625 | (defun dired-buffer-stale-p (&optional noconfirm) |
| 627 | "Return non-nil if current dired buffer needs updating. | 626 | "Return non-nil if current dired buffer needs updating. |