620 |
(modtime (visited-file-modtime))) |
(modtime (visited-file-modtime))) |
621 |
(or (eq modtime 0) |
(or (eq modtime 0) |
622 |
(not (eq (car attributes) t)) |
(not (eq (car attributes) t)) |
623 |
(and (= (car (nth 5 attributes)) (car modtime)) |
(equal (nth 5 attributes) modtime))))) |
|
(= (nth 1 (nth 5 attributes)) (cdr modtime))))))) |
|
624 |
|
|
625 |
(defun dired-buffer-stale-p (&optional noconfirm) |
(defun dired-buffer-stale-p (&optional noconfirm) |
626 |
"Return non-nil if current dired buffer needs updating. |
"Return non-nil if current dired buffer needs updating. |