git-monitor 2.0.0.0 → 2.0.1.0
raw patch · 2 files changed
+10/−8 lines, 2 filesdep ~gitlibdep ~gitlib-libgit2
Dependency ranges changed: gitlib, gitlib-libgit2
Files
- Main.hs +7/−5
- git-monitor.cabal +3/−3
Main.hs view
@@ -60,7 +60,8 @@ instance Read FilePath data Options = Options- { verbose :: Bool+ { quiet :: Bool+ , verbose :: Bool , debug :: Bool , gitDir :: String , workingDir :: String@@ -70,7 +71,8 @@ options :: Parser Options options = Options- <$> switch (short 'v' <> long "verbose" <> help "Display info")+ <$> switch (short 'q' <> long "quiet" <> help "Do not display progress")+ <*> switch (short 'v' <> long "verbose" <> help "Display more info") <*> switch (short 'D' <> long "debug" <> help "Display debug") <*> strOption (long "git-dir" <> value ".git"@@ -93,7 +95,7 @@ doMain :: Options -> IO () doMain opts = do -- Setup logging service if --verbose is used- when (verbose opts) $ initLogging (debug opts)+ unless (quiet opts) $ initLogging (debug opts) -- Ask Git for the user name and email in this repository (userName,userEmail) <- shelly $ silently $@@ -125,8 +127,8 @@ where initLogging debugMode = do let level | debugMode = DEBUG- | verbose opts = INFO- | otherwise = NOTICE+ | verbose opts = DEBUG+ | otherwise = INFO h <- (`setFormatter` tfLogFormatter "%H:%M:%S" "$time - [$prio] $msg") <$> streamHandler System.IO.stderr level removeAllHandlers
git-monitor.cabal view
@@ -1,5 +1,5 @@ Name: git-monitor-Version: 2.0.0.0+Version: 2.0.1.0 Synopsis: Passively snapshots working tree changes efficiently. Description: Passively snapshots working tree changes efficiently.@@ -23,8 +23,8 @@ Build-depends: base >= 4 && < 5 , bytestring >= 0.9.2.1 , containers >= 0.4.2.1- , gitlib >= 2.0.0.0- , gitlib-libgit2 >= 2.0.0.0+ , gitlib >= 2.0.1.0+ , gitlib-libgit2 >= 2.0.1.0 , hslogger >= 1.2 , old-locale >= 1.0.0.4 , optparse-applicative >= 0.5.2.1