$OpenBSD: patch-props_ml,v 1.1 2005/05/30 19:27:45 sturm Exp $
Post-release developer patch.
o Fix in property setting.  In particular, set properties in the right order.
  See http://lists.seas.upenn.edu/pipermail/unison-hackers/2005-May/000090.html
--- props.ml.orig	Mon Sep  6 15:15:46 2004
+++ props.ml	Fri May 27 16:28:48 2005
@@ -421,7 +421,7 @@ let syncedPartsToString t = match t with
 
 let iCanWrite p =
   try
-    Unix.access p [Unix.R_OK];
+    Unix.access p [Unix.W_OK];
     true
   with
     Unix.Unix_error _ -> false
@@ -615,9 +615,9 @@ let get stats infos =
 let set fspath path kind p =
   Uid.set fspath path kind p.uid;
   Gid.set fspath path kind p.gid;
-  Perm.set fspath path kind p.perm;
+  TypeCreator.set fspath path kind p.typeCreator;
   Time.set fspath path kind p.time;
-  TypeCreator.set fspath path kind p.typeCreator
+  Perm.set fspath path kind p.perm
 
 let init someHostIsRunningWindows =
   Perm.init someHostIsRunningWindows;
