filestore 0.3.2 → 0.3.2.1
raw patch · 3 files changed
+8/−4 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGES +5/−1
- Data/FileStore/Utils.hs +1/−1
- filestore.cabal +2/−2
CHANGES view
@@ -1,4 +1,8 @@-Version 0.3.2 released ??+Version 0.3.2.1 released 24 Oct 2009++* Convert pathname to UTF8 in withVerifyDir.++Version 0.3.2 released 22 Aug 2009 * Made maxcount default to True, as '--max-count' is supported by the latest released version of darcs (2.3.0). Print an informative
Data/FileStore/Utils.hs view
@@ -210,7 +210,7 @@ -- | we don't actually need the contents, just want to check that the directory exists and we have enough permissions withVerifyDir :: FilePath -> IO a -> IO a withVerifyDir d a =- catch (liftM head (getDirectoryContents d) >> a) $ \e ->+ catch (liftM head (getDirectoryContents $ encodeString d) >> a) $ \e -> if "No such file or directory" `isInfixOf` show e then throwIO NotFound else throwIO . UnknownError . show $ e
filestore.cabal view
@@ -1,5 +1,5 @@ Name: filestore-Version: 0.3.2+Version: 0.3.2.1 Cabal-version: >= 1.2 Build-type: Custom Tested-with: GHC==6.10.1@@ -39,7 +39,7 @@ Data.FileStore.Utils, Data.FileStore.Generic Other-modules: Paths_filestore, Data.FileStore.DarcsXml - if flag(maxcount)+ if flag(maxcount) cpp-options: -DUSE_MAXCOUNT extensions: CPP