# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1086049550 0
# Node ID 304d478aa59499d226139a4816dff271c5bfa7d9
# Parent  f48e0e8c2740846070f898692e0d618e93435da5
(vc-arch-state): Don't assume the file exists.

diff -r f48e0e8c2740 -r 304d478aa594 lisp/vc-arch.el
--- a/lisp/vc-arch.el	Mon May 31 21:45:51 2004 +0000
+++ b/lisp/vc-arch.el	Tue Jun 01 00:25:50 2004 +0000
@@ -272,7 +272,7 @@
 		;; Buh?  Unexpected format.
 		'edited
 	      (let ((ats (file-attributes file)))
-		(if (and (= (nth 7 ats) (string-to-number (match-string 2)))
+		(if (and (eq (nth 7 ats) (string-to-number (match-string 2)))
 			 (equal (format-time-string "%s" (nth 5 ats))
 				(match-string 1)))
 		    'up-to-date