Fix ocaml#270

Catch the exception if $HOME is not defined.
samoht · Nov 7, 2012 · 8eba6ab · 8eba6ab
1 parent 38d2f72
commit 8eba6ab
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/core/opamGlobals.ml b/src/core/opamGlobals.ml
@@ -41,7 +41,10 @@ let switch : string option ref = ref None
 
 let opam_version = "1"
 
-let home = Unix.getenv "HOME"
+let home =
+  try Unix.getenv "HOME"
+  with _ -> Unix.getcwd ()
+
 let default_opam_dir = Filename.concat home ".opam"
 
 let root_dir = ref default_opam_dir