aboutsummaryrefslogtreecommitdiff
path: root/lib/system.ml
diff options
context:
space:
mode:
authorpboutill2011-11-20 20:03:06 +0000
committerpboutill2011-11-20 20:03:06 +0000
commit5ec2163ce648db25aba87f5208841397fd2e1b1c (patch)
tree7605292fdb65b235b98f315cc07694363c286ba5 /lib/system.ml
parentab6f28a2a5251cc7ef18948dc619781e82e43e71 (diff)
coqrc in the right XDG_CONFIG_HOME/coq folder
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14696 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/system.ml')
-rw-r--r--lib/system.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/system.ml b/lib/system.ml
index edab244606..7d54e2c3a2 100644
--- a/lib/system.ml
+++ b/lib/system.ml
@@ -33,7 +33,7 @@ let home =
try Sys.getenv "USERPROFILE" with Not_found ->
warning ("Cannot determine user home directory, using '.' .");
flush_all ();
- "."
+ Filename.current_dir_name
let safe_getenv n = safe_getenv_def n ("$"^n)