orgstat 0.0.1 → 0.0.2
raw patch · 2 files changed
+6/−4 lines, 2 filesdep ~log-warper
Dependency ranges changed: log-warper
Files
- orgstat.cabal +2/−1
- src/cli/Main.hs +4/−3
orgstat.cabal view
@@ -1,8 +1,9 @@ name: orgstat-version: 0.0.1+version: 0.0.2 synopsis: Statistics visualizer for org-mode license: GPL-3 license-file: LICENSE+homepage: https://github.com/volhovM/orgstat author: Mikhail Volkhov <volhovm.cs@gmail.com>, Zhenya Vinogradov <zhenyavinogradov@gmail.com> maintainer: volhovm.cs@gmail.com build-type: Simple
src/cli/Main.hs view
@@ -9,8 +9,8 @@ import Paths_orgstat (version) import System.Directory (getHomeDirectory) import System.FilePath ((</>))-import System.Wlog (LoggingFormat (..), logDebug, logError)-import qualified System.Wlog as W+import System.Wlog (Severity (..), consoleOutB, lcTermSeverity,+ logDebug, logError, setupLogging) import Universum import OrgStat.Logic (runOrgStat)@@ -48,7 +48,8 @@ main :: IO () main = do args@Args{..} <- getNodeOptions =<< getHomeDirectory- W.initLoggingWith (LoggingFormat False) (if debug then W.Debug else W.Info)+ let sev = if debug then Debug else Info+ setupLogging $ consoleOutB True & lcTermSeverity .~ Just sev runWorkM (WorkScope configPath xdgOpen) $ do logDebug $ "Just started with options: " <> show args runOrgStat `catch` topHandler