From: Simon Marlow Date: Thu, 18 Oct 2007 12:17:55 +0000 (+0000) Subject: import System.Directory, not Directory X-Git-Tag: 2008-05-28~9 X-Git-Url: http://git.megacz.com/?p=haskell-directory.git;a=commitdiff_plain;h=8af1abacf899be128c3b195696b24c9fc81bc282 import System.Directory, not Directory --- diff --git a/tests/currentDirectory001.hs b/tests/currentDirectory001.hs index bcf9b96..d8ca7b3 100644 --- a/tests/currentDirectory001.hs +++ b/tests/currentDirectory001.hs @@ -1,4 +1,4 @@ -import Directory (getCurrentDirectory, setCurrentDirectory, +import System.Directory (getCurrentDirectory, setCurrentDirectory, createDirectory, removeDirectory, getDirectoryContents) main = do diff --git a/tests/directory001.hs b/tests/directory001.hs index c04a015..5abfbdc 100644 --- a/tests/directory001.hs +++ b/tests/directory001.hs @@ -1,6 +1,5 @@ -import IO - -import Directory +import System.IO +import System.Directory main = do createDirectory "foo" diff --git a/tests/getDirContents001.hs b/tests/getDirContents001.hs index 1c0e3f8..9f35351 100644 --- a/tests/getDirContents001.hs +++ b/tests/getDirContents001.hs @@ -1,5 +1,5 @@ -import Directory (getDirectoryContents) -import List (sort, isPrefixOf, isSuffixOf) +import System.Directory (getDirectoryContents) +import Data.List (sort, isPrefixOf, isSuffixOf) main = do names <- getDirectoryContents "." diff --git a/tests/getPermissions001.hs b/tests/getPermissions001.hs index 0c435df..f1fbeaa 100644 --- a/tests/getPermissions001.hs +++ b/tests/getPermissions001.hs @@ -1,4 +1,4 @@ -import Directory +import System.Directory main = do p <- getPermissions "."