changeset 54542:0b174cfd1511

(dired-directory-changed-p): Reindent.
author Luc Teirlinck <teirllm@auburn.edu>
date Thu, 25 Mar 2004 04:21:24 +0000
parents 40ab259813f3
children 5766a12d96ac
files lisp/dired.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- 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.