Skip to content
This repository has been archived by the owner on Mar 25, 2024. It is now read-only.

Commit

Permalink
Merge branch 'hotfix/0.10.1'
Browse files Browse the repository at this point in the history
  • Loading branch information
smallhadroncollider committed Feb 8, 2018
2 parents fc2b7f3 + 023302e commit a4f4dde
Show file tree
Hide file tree
Showing 3 changed files with 5 additions and 5 deletions.
3 changes: 2 additions & 1 deletion src/App.hs
Original file line number Diff line number Diff line change
Expand Up @@ -2,6 +2,7 @@ module App (go) where

import Control.Monad (void)
import Control.Monad.IO.Class (liftIO)
import Control.Concurrent (forkIO)
import Flow.State (State, Mode(..), lists, continue, path, mode)
import Brick
import Persistence.Taskell (writeFile)
Expand All @@ -15,7 +16,7 @@ import UI.Types (ResourceName(..))
-- store
store :: State -> IO State
store s = do
Persistence.Taskell.writeFile (lists s) (path s)
forkIO $ Persistence.Taskell.writeFile (lists s) (path s)
return (Flow.State.continue s)

-- App code
Expand Down
5 changes: 2 additions & 3 deletions src/Persistence/Taskell.hs
Original file line number Diff line number Diff line change
@@ -1,10 +1,9 @@
module Persistence.Taskell where

import Prelude hiding (writeFile, readFile)
import Prelude hiding (writeFile)
import System.Directory
import System.Environment (getArgs)
import Control.Monad (void)
import Control.Concurrent (forkIO)
import Persistence.Markdown (stringify, parse)
import qualified Data.ByteString as BS

Expand Down Expand Up @@ -39,7 +38,7 @@ createPath = writeFile initial

-- writes Tasks to json file
writeFile :: Lists -> FilePath -> IO ()
writeFile tasks path = void (forkIO . BS.writeFile path $ stringify tasks)
writeFile tasks path = void (BS.writeFile path $ stringify tasks)

-- reads json file
readFile :: FilePath -> IO Lists
Expand Down
2 changes: 1 addition & 1 deletion taskell.cabal
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
name: taskell
version: 0.10.0.0
version: 0.10.1.0
-- synopsis: A CLI task manager, written in Haskell
-- description: Allows you to create version controlled task lists
homepage: https://github.com/smallhadroncollider/taskell#readme
Expand Down

0 comments on commit a4f4dde

Please sign in to comment.