doesDirectoryExist "/" ==> False
doesDirectoryExist gives False when called with root dir, "/".
I think that the following patch corrects this (I have not tried yet):
$ diff -u Directory.hs,orig Directory.hs
--- Directory.hs,orig 2003-04-11 12:11:24.000000000 +0200
+++ Directory.hs 2003-09-15 18:22:56.000000000 +0200
@@ -597,7 +597,7 @@
fileNameEndClean :: String -> String
fileNameEndClean name =
- if i >= 0 && (ec == '\\' || ec == '/') then
+ if i > 0 && (ec == '\\' || ec == '/') then
fileNameEndClean (take i name)
else
name
vbzoli@vbzo.li
Trac metadata
Trac field |
Value |
Version |
None |
Type |
Bug |
TypeOfFailure |
OtherFailure |
Priority |
normal |
Resolution |
ResolvedFixed |
Component |
None |
Test case |
|
Differential revisions |
|
BlockedBy |
|
Related |
|
Blocking |
|
CC |
|
Operating system |
|
Architecture |
|