Bugs item #806633, was opened at 2003-09-15 16:35
Message generated for change (Comment added) made by simonmar
You can respond by visiting:
https://sourceforge.net/tracker/?func=detail&atid=108032&aid=806633&group_id=8032
Category: None
Group: None
>Status: Closed
>Resolution: Fixed
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
>Assigned to: Simon Marlow (simonmar)
Summary: doesDirectoryExist "/" ==> False
Initial Comment:
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
[EMAIL PROTECTED]
----------------------------------------------------------------------
>Comment By: Simon Marlow (simonmar)
Date: 2003-09-23 14:46
Message:
Logged In: YES
user_id=48280
Fixed, thanks.
----------------------------------------------------------------------
You can respond by visiting:
https://sourceforge.net/tracker/?func=detail&atid=108032&aid=806633&group_id=8032
_______________________________________________
Glasgow-haskell-bugs mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs
