diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -2,3 +2,6 @@
 
 * Initial version.
 
+0.0.2
+
+* Fix imports and exports
diff --git a/foscam-directory.cabal b/foscam-directory.cabal
--- a/foscam-directory.cabal
+++ b/foscam-directory.cabal
@@ -1,12 +1,12 @@
 name:               foscam-directory
-version:            0.0.1
+version:            0.0.2
 license:            BSD3
 license-file:       LICENSE
 author:             Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ> <dibblego>
 maintainer:         Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ> <dibblego>
 copyright:          Copyright (C) 2015 Tony Morris
 synopsis:           Foscam File format
-category:           Data
+category:           Data, File
 description:        
   Directory of Foscam File format
 
diff --git a/src/Data/Foscam/Directory.hs b/src/Data/Foscam/Directory.hs
--- a/src/Data/Foscam/Directory.hs
+++ b/src/Data/Foscam/Directory.hs
@@ -1,13 +1,21 @@
+{-# LANGUAGE NoImplicitPrelude #-}
+
 module Data.Foscam.Directory(
   getFoscamDirectoryContents
+, FoscamDirectoryFile(Isn't, Is)
 ) where
 
-import Data.Foscam.File.Filename
-import System.Directory
-import Text.Trifecta
-import Text.Trifecta.Delta
-import Data.ByteString.UTF8 as UTF8
-import Prelude
+import Data.Foscam.File.Filename(Filename, filename)
+import System.Directory(getDirectoryContents)
+import Text.Trifecta(Result(Success, Failure), parseString)
+import Text.Trifecta.Delta(Delta(Directed))
+import Data.ByteString.UTF8 as UTF8(fromString)
+import Data.Eq(Eq)
+import Data.Ord(Ord)
+import System.IO(IO, FilePath)
+import Control.Category((.))
+import Data.Functor(fmap, (<$>))
+import Prelude(Show)
 
 data FoscamDirectoryFile =
   Isn't FilePath
@@ -22,4 +30,4 @@
         Is n
       fromResult (Failure _) =
         Isn't p
-  in map (fromResult . parseString filename (Directed (UTF8.fromString p) 0 0 0 0)) <$> getDirectoryContents p
+  in fmap (fromResult . parseString filename (Directed (UTF8.fromString p) 0 0 0 0)) <$> getDirectoryContents p