@@ -335,7 +335,12 @@ auditPackage True ipkg = do
335335
336336 getIdrisFiles :: FilePath -> IO [FilePath]
337337 getIdrisFiles dir = do
338− contents <- listDirectory dir
338+ contents <- getDirectoryContents dir
339+ let contents' = filter (\fname -> fname /= "." && fname /= "..") contents
340+
341+ -- [ NOTE ] Directory >= 1.2.5.0 introduced `listDirectory` but later versions of directory appear to be causing problems with ghc 7.10.3 and cabal 1.22 in travis. Let's reintroduce the old ranges for directory to be sure.
342+
343+
339344 files <- forM contents (findRest dir)
340345 return $ filter (isIdrisFile) (concat files)
341346