Workaround for a BSD bug (submitted by Boender).

[helm.git] / matita / components / extlib / hExtlib.ml

diff --git a/matita/components/extlib/hExtlib.ml b/matita/components/extlib/hExtlib.ml
index 0b13cd83e4566013b74ec3b18019c4d2e542482d..8871a35df0cc30f3bf1a4e27aacd9216c9097dd0 100644 (file)
--- a/matita/components/extlib/hExtlib.ml
+++ b/matita/components/extlib/hExtlib.ml
@@ -437,6 +437,7 @@ let mkdir path =
           Unix.mkdir path 0o755; chmod 0o2775 path 
         with 
         | Unix.Unix_error (Unix.EEXIST,_,_) -> ()
+        | Unix.Unix_error (Unix.EISDIR,_,_) -> () (* work-around for a bug in FreeBSD *)
         | Unix.Unix_error (e,_,_) -> 
             raise 
               (Failure