Villefort 0.1.0.3 → 0.1.0.4

raw patch · 3 files changed

+21/−12 lines, 3 filesbinary-addedPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

Files

• Villefort.cabal +14/−10
• data/todo.db binary
• src/Database.hs +7/−2

@@ -1,5 +1,5 @@ name:                Villefort-version:             0.1.0.3+version:             0.1.0.4 synopsis: Villefort is a task manager and time tracker written in haskell. description: It is based off of a sqlite database and has the ability to add new tasks homepage:            https://github.com/Chrisr850/Villefort#readme@@ -12,29 +12,33 @@ build-type:          Simple extra-source-files:  README.md cabal-version:       >=1.10-+data-files:            data/todo.db+                        library   hs-source-dirs:      src+  other-modules:       Paths_Villefort   exposed-modules:     Lib                      , Database                      , Todo                      , Stats   build-depends:       base >= 4.9 && < 5-                     , HDBC-                     , HDBC-sqlite3-                     , split-                     , time-                     , FindBin-                     , mtl+                     , HDBC >= 2.4.0 && < 2.5+                     , HDBC-sqlite3 >= 2.3.3 && < 2.4+                     , split  >= 0.2.3 && < 0.3+                     , time >= 1.6.0 && < 1.7+                     , FindBin >= 0.0.5 && < 0.1+                     , mtl  >= 2.2.1 && < 2.3+                     +   default-language:    Haskell2010  executable Villefort   hs-source-dirs:      app   main-is:             Main.hs   ghc-options:         -threaded -rtsopts -with-rtsopts=-N -  build-depends:       base +  build-depends:       base                      , Villefort-                     , scotty+                     , scotty >= 0.11.0 && < 0.12                      , HDBC-sqlite3                      , HDBC                      , split

binary file changed (absent → 12288 bytes)

@@ -7,17 +7,22 @@ import Database.HDBC import Data.List.Split import System.Environment.FindBin-+import Paths_Villefort+   type Query = String type Path  = String type Subject = String + getSubjects :: IO [Subject] getSubjects = (\x-> (!! 0) <$> x) <$> makeQuery "select Subject from todo where state = 0 group by Subject"  --path =fmap (\x -> (x !! 0) ++ "Villefort.app/Contents/Resources/") $  (Data.List.Split.splitOn "Villefort.app") <$> getProgPath-path :: IO Path+--path :: IO Path path =fmap (\x -> (x !! 0) ++ "Villefort/") $  (Data.List.Split.splitOn "Villefort/") <$> getProgPath+--path = getDataDir++path' = getDataDir  getDb :: IO Connection   getDb =  (++ "data/todo.db") <$> path >>= \path ->   putStrLn path >> connectSqlite3 path