# HG changeset patch # User Luc Teirlinck # Date 1080188484 0 # Node ID 0b174cfd15113b7ae52daa0098c20b65780de855 # Parent 40ab259813f3cae5a94ef768a2948cfcd27044b7 (dired-directory-changed-p): Reindent. diff -r 40ab259813f3 -r 0b174cfd1511 lisp/dired.el --- a/lisp/dired.el Thu Mar 25 02:02:53 2004 +0000 +++ b/lisp/dired.el Thu Mar 25 04:21:24 2004 +0000 @@ -530,11 +530,11 @@ ;; disk. DIRNAME should be the directory name of that directory. (defun dired-directory-changed-p (dirname) (not (let ((attributes (file-attributes dirname)) - (modtime (visited-file-modtime))) - (or (eq modtime 0) - (not (eq (car attributes) t)) - (and (= (car (nth 5 attributes)) (car modtime)) - (= (nth 1 (nth 5 attributes)) (cdr modtime))))))) + (modtime (visited-file-modtime))) + (or (eq modtime 0) + (not (eq (car attributes) t)) + (and (= (car (nth 5 attributes)) (car modtime)) + (= (nth 1 (nth 5 attributes)) (cdr modtime))))))) (defun dired-buffer-stale-p (&optional noconfirm) "Return non-nil if current dired buffer needs updating.