git-gpush 2.1.0.0 → 3.0.0
raw patch · 2 files changed
+9/−8 lines, 2 filesdep ~gitlibdep ~gitlib-cmdline
Dependency ranges changed: gitlib, gitlib-cmdline
Files
- Main.hs +5/−4
- git-gpush.cabal +4/−4
Main.hs view
@@ -12,6 +12,7 @@ import Control.Monad import Control.Monad.IO.Class (MonadIO(..))+import Control.Monad.Trans.Reader import Data.Char import Data.Foldable hiding (concat, concatMap, elem) import Data.List@@ -35,10 +36,10 @@ import Shelly hiding (FilePath) #if USE_LIBGIT2-factory :: RepositoryFactory Lg.LgRepository IO Lg.Repository+factory :: RepositoryFactory (ReaderT Lg.LgRepo (NoLoggingT IO)) IO Lg.LgRepo factory = Lg.lgFactory #else-factory :: RepositoryFactory Cli.CmdLineRepository IO Cli.Repository+factory :: RepositoryFactory (ReaderT Cli.CliRepo IO) IO Cli.CliRepo factory = Cli.cliFactory #endif @@ -83,7 +84,7 @@ git_ = run_ "git" main :: IO ()-main = withBackendDo factory $ execParser opts >>= pushToGitHub+main = execParser opts >>= pushToGitHub where opts = info (helper <*> options) (fullDesc <> progDesc desc <> header hdr)@@ -106,7 +107,7 @@ withRepository factory gd $ do cref <- fromJust <$> resolveReference "HEAD"- hc <- lookupCommit cref+ hc <- lookupCommit (Tagged cref) rcoid <- Tagged <$> parseOid (toStrict remoteHead) objs <- listObjects (Just rcoid) (commitOid hc) False for_ objs $ \obj -> case obj of
git-gpush.cabal view
@@ -1,5 +1,5 @@ Name: git-gpush-Version: 2.1.0.0+Version: 3.0.0 Synopsis: More intelligent push-to-GitHub utility. Description: More intelligent push-to-GitHub utility.@@ -21,9 +21,9 @@ ghc-options: -Wall Build-depends: base >= 4 && < 5- , gitlib >= 2.1.0.0- , gitlib-cmdline >= 2.1.0.0- -- , gitlib-libgit2 >= 2.1.0.0+ , gitlib >= 3.0.0+ , gitlib-cmdline >= 3.0.0+ -- , gitlib-libgit2 >= 3.0.0 , bytestring >= 0.9.2.1 , containers >= 0.4.2.1 , directory >= 1.1.0.2