From: Malcolm.Wallace@cs.york.ac.uk Date: Mon, 23 Nov 2009 09:05:57 +0000 (+0000) Subject: Use H'98-compliant indentation in do-block. X-Git-Tag: ghc-darcs-git-switchover~15 X-Git-Url: http://git.megacz.com/?p=haskell-directory.git;a=commitdiff_plain;h=ce3bf8c2148873b5f332865fe02450169cdeb68b Use H'98-compliant indentation in do-block. --- diff --git a/System/Directory.hs b/System/Directory.hs index 3057328..3498987 100644 --- a/System/Directory.hs +++ b/System/Directory.hs @@ -784,8 +784,8 @@ getDirectoryContents path = loop dirp = do e <- Posix.readDirStream dirp if null e then return [] else do - es <- loop dirp - return (e:es) + es <- loop dirp + return (e:es) #else bracket (Win32.findFirstFile (path "*"))