gitlib 3.1.2 → 3.1.3
raw patch · 2 files changed
+5/−4 lines, 2 filesdep ~conduitdep ~conduit-combinatorsPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: conduit, conduit-combinators
API changes (from Hackage documentation)
- Git.Types: instance Data.Semigroup.Semigroup (Git.Types.ModifiedBuilder r m)
- Git.Types: instance GHC.Exception.Exception Git.Types.GitException
+ Git.Types: instance GHC.Base.Semigroup (Git.Types.ModifiedBuilder r m)
+ Git.Types: instance GHC.Exception.Type.Exception Git.Types.GitException
- Git.Tree.Builder: BuilderUnchanged :: (TreeBuilder r m) -> ModifiedBuilder r m
+ Git.Tree.Builder: BuilderUnchanged :: TreeBuilder r m -> ModifiedBuilder r m
- Git.Tree.Builder: ModifiedBuilder :: (TreeBuilder r m) -> ModifiedBuilder r m
+ Git.Tree.Builder: ModifiedBuilder :: TreeBuilder r m -> ModifiedBuilder r m
- Git.Tree.Builder: TreeEntryMutated :: (TreeEntry r) -> ModifyTreeResult r
+ Git.Tree.Builder: TreeEntryMutated :: TreeEntry r -> ModifyTreeResult r
- Git.Tree.Builder: TreeEntryPersistent :: (TreeEntry r) -> ModifyTreeResult r
+ Git.Tree.Builder: TreeEntryPersistent :: TreeEntry r -> ModifyTreeResult r
- Git.Types: Blob :: !(BlobOid r) -> !(BlobContents m) -> Blob r m
+ Git.Types: Blob :: !BlobOid r -> !BlobContents m -> Blob r m
- Git.Types: BlobEntry :: !(BlobOid r) -> !BlobKind -> TreeEntry r
+ Git.Types: BlobEntry :: !BlobOid r -> !BlobKind -> TreeEntry r
- Git.Types: BlobObj :: !(Blob r m) -> Object r m
+ Git.Types: BlobObj :: !Blob r m -> Object r m
- Git.Types: BlobObjOid :: !(BlobOid r) -> ObjectOid r
+ Git.Types: BlobObjOid :: !BlobOid r -> ObjectOid r
- Git.Types: BlobSizedStream :: !(ByteSource m) -> !Int -> BlobContents m
+ Git.Types: BlobSizedStream :: !ByteSource m -> !Int -> BlobContents m
- Git.Types: BlobStream :: !(ByteSource m) -> BlobContents m
+ Git.Types: BlobStream :: !ByteSource m -> BlobContents m
- Git.Types: BuilderUnchanged :: (TreeBuilder r m) -> ModifiedBuilder r m
+ Git.Types: BuilderUnchanged :: TreeBuilder r m -> ModifiedBuilder r m
- Git.Types: Commit :: !(CommitOid r) -> ![CommitOid r] -> !(TreeOid r) -> !Signature -> !Signature -> !CommitMessage -> !Text -> Commit r
+ Git.Types: Commit :: !CommitOid r -> ![CommitOid r] -> !TreeOid r -> !Signature -> !Signature -> !CommitMessage -> !Text -> Commit r
- Git.Types: CommitEntry :: !(CommitOid r) -> TreeEntry r
+ Git.Types: CommitEntry :: !CommitOid r -> TreeEntry r
- Git.Types: CommitObj :: !(Commit r) -> Object r m
+ Git.Types: CommitObj :: !Commit r -> Object r m
- Git.Types: CommitObjOid :: !(CommitOid r) -> ObjectOid r
+ Git.Types: CommitObjOid :: !CommitOid r -> ObjectOid r
- Git.Types: ModifiedBuilder :: (TreeBuilder r m) -> ModifiedBuilder r m
+ Git.Types: ModifiedBuilder :: TreeBuilder r m -> ModifiedBuilder r m
- Git.Types: RefObj :: !(Oid r) -> RefTarget
+ Git.Types: RefObj :: !Oid r -> RefTarget (r :: *)
- Git.Types: RefSymbolic :: !RefName -> RefTarget
+ Git.Types: RefSymbolic :: !RefName -> RefTarget (r :: *)
- Git.Types: RepositoryOptions :: !FilePath -> !(Maybe FilePath) -> !Bool -> !Bool -> RepositoryOptions
+ Git.Types: RepositoryOptions :: !FilePath -> !Maybe FilePath -> !Bool -> !Bool -> RepositoryOptions
- Git.Types: Tag :: !(TagOid r) -> !(CommitOid r) -> Tag r
+ Git.Types: Tag :: !TagOid r -> !CommitOid r -> Tag r
- Git.Types: TagObj :: !(Tag r) -> Object r m
+ Git.Types: TagObj :: !Tag r -> Object r m
- Git.Types: TagObjOid :: !(TagOid r) -> ObjectOid r
+ Git.Types: TagObjOid :: !TagOid r -> ObjectOid r
- Git.Types: TreeEntry :: !(TreeOid r) -> TreeEntry r
+ Git.Types: TreeEntry :: !TreeOid r -> TreeEntry r
- Git.Types: TreeObj :: !(Tree r) -> Object r m
+ Git.Types: TreeObj :: !Tree r -> Object r m
- Git.Types: TreeObjOid :: !(TreeOid r) -> ObjectOid r
+ Git.Types: TreeObjOid :: !TreeOid r -> ObjectOid r
- Git.Types: [blobContents] :: Blob r m -> !(BlobContents m)
+ Git.Types: [blobContents] :: Blob r m -> !BlobContents m
- Git.Types: [blobEntryOid] :: TreeEntry r -> !(BlobOid r)
+ Git.Types: [blobEntryOid] :: TreeEntry r -> !BlobOid r
- Git.Types: [blobOid] :: Blob r m -> !(BlobOid r)
+ Git.Types: [blobOid] :: Blob r m -> !BlobOid r
- Git.Types: [commitEntryOid] :: TreeEntry r -> !(CommitOid r)
+ Git.Types: [commitEntryOid] :: TreeEntry r -> !CommitOid r
- Git.Types: [commitOid] :: Commit r -> !(CommitOid r)
+ Git.Types: [commitOid] :: Commit r -> !CommitOid r
- Git.Types: [commitTree] :: Commit r -> !(TreeOid r)
+ Git.Types: [commitTree] :: Commit r -> !TreeOid r
- Git.Types: [repoWorkingDir] :: RepositoryOptions -> !(Maybe FilePath)
+ Git.Types: [repoWorkingDir] :: RepositoryOptions -> !Maybe FilePath
- Git.Types: [tagCommit] :: Tag r -> !(CommitOid r)
+ Git.Types: [tagCommit] :: Tag r -> !CommitOid r
- Git.Types: [tagOid] :: Tag r -> !(TagOid r)
+ Git.Types: [tagOid] :: Tag r -> !TagOid r
- Git.Types: [treeEntryOid] :: TreeEntry r -> !(TreeOid r)
+ Git.Types: [treeEntryOid] :: TreeEntry r -> !TreeOid r
- Git.Types: textToSha :: Monad m => Text -> m SHA
+ Git.Types: textToSha :: MonadFail m => Text -> m SHA
Files
- Git/Types.hs +4/−3
- gitlib.cabal +1/−1
Git/Types.hs view
@@ -9,6 +9,7 @@ import Control.Applicative import Control.Exception import Control.Monad+import Control.Monad.Fail (MonadFail) import Control.Monad.Trans.State import Data.ByteString (ByteString) import qualified Data.ByteString.Base16 as B16@@ -137,11 +138,11 @@ shaToText :: SHA -> Text shaToText (SHA bs) = T.decodeUtf8 (B16.encode bs) -textToSha :: Monad m => Text -> m SHA+textToSha :: MonadFail m => Text -> m SHA textToSha t = case B16.decode $ T.encodeUtf8 t of- (bs, "") -> return (SHA bs)- _ -> fail "Invalid base16 encoding"+ Right bs -> return (SHA bs)+ Left err -> fail $ "Invalid base16 encoding: " ++ err instance IsOid SHA where renderOid = shaToText
gitlib.cabal view
@@ -1,5 +1,5 @@ Name: gitlib-Version: 3.1.2+Version: 3.1.3 Synopsis: API library for working with Git repositories License-file: LICENSE License: MIT