foscam-directory 0.0.1 → 0.0.2

raw patch · 3 files changed

+20/−9 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• changelog +3/−0
• foscam-directory.cabal +2/−2
• src/Data/Foscam/Directory.hs +15/−7

@@ -2,3 +2,6 @@  * Initial version. +0.0.2++* Fix imports and exports

@@ -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 

@@ -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