Villefort 0.1.1.12 → 0.1.1.13

raw patch · 4 files changed

+4/−3 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

README.md +1/−1
Villefort.cabal +1/−1
src/Villefort/Daily.hs +1/−0
src/Villefort/Database.hs +1/−1

README.md view

@@ -1,7 +1,7 @@ # Villefort
 Villefort is a time managment system written in Haskell.
 
-## Version 1.1.11
+## Version 1.1.13
 You can define your own colors.
 [default config](https://gist.github.com/Chrisr850/3ca20d75c3ac8aaa585c3140e959fdb1)

Villefort.cabal view

@@ -1,5 +1,5 @@ name:                Villefort-version:             0.1.1.12+version:             0.1.1.13 synopsis: Villefort is a task manager and time tracker written in haskell. description: Villefort is a browser based time tracker. homepage:            https://github.com/Chrisr850/Villefort#readme

src/Villefort/Daily.hs view

@@ -23,6 +23,7 @@    getSummaryDay :: (MonadReader VConfig m, MonadIO m) => Day -> m String getSummaryDay day = do+  liftIO $ putStrLn $ show  day   dat <- getDoneDay $ show  day   return ( (lookup !! week) ++  (makeTable ["Subject","Time"] $ dat ++ [["Total", show$  total dat]]))   where (_,_,week) =  toWeekDate day

src/Villefort/Database.hs view

@@ -94,7 +94,7 @@   getDoneDay :: (MonadReader VConfig m, MonadIO m) =>String -> m [[String]]-getDoneDay day = makeQuery $  "select Title, time  from todo where substr(Due,1,10) = "++ day ++ " and time != 0"+getDoneDay day = makeQuery $  "select Title, time  from todo where substr(Due,1,10) = '"++ day ++ "' and time != 0"   -- | Query to get average of subjects