diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2003-03-24 15:26:35 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2003-03-24 15:26:35 +0000 |
| commit | 14e7582e8dabae96f61dff648159d9ba3d45d9bc (patch) | |
| tree | e96821ff2bc58994eeed393e05f16af898860c90 /stdlib/filename.ml | |
| parent | 48d55877b7d11b3a0b22fd6f9a91ab6331b2cfd5 (diff) | |
En Windows, utiliser . comme repertoire temporaire si la variable TEMP n'est pas definie. WinXP ne cree pas le repertoire C:\temp.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5453 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib/filename.ml')
| -rw-r--r-- | stdlib/filename.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/filename.ml b/stdlib/filename.ml index 34853f85d..05d32fa25 100644 --- a/stdlib/filename.ml +++ b/stdlib/filename.ml @@ -107,7 +107,7 @@ module Win32 = struct with Not_found -> "." let temporary_directory = - try Sys.getenv "TEMP" with Not_found -> "C:\\temp" + try Sys.getenv "TEMP" with Not_found -> "." let quote s = let l = String.length s in let b = Buffer.create (l + 20) in |