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