MasseR/buuka
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

base: MasseR:a921139295aef7056630c453832f2e8209c8b095
Branches Tags
MasseR:master
MasseR:import
..
compare: MasseR:cee5ad8addbae0b38de754808daf16409a939718
Branches Tags
MasseR:master
MasseR:import

No commits in common. "a921139295aef7056630c453832f2e8209c8b095" and "cee5ad8addbae0b38de754808daf16409a939718" have entirely different histories.
a921139295 ... cee5ad8add

1 changed files with 2 additions and 8 deletions
Show Stats Expand all files Collapse all files

10
app/Main.hs
View File

@ -14,9 +14,6 @@ import UnliftIO.Directory
import Data.Foldable
(asum)
import System.Environment
(lookupEnv)
import qualified Operations
import Data.Query
@ -38,8 +35,5 @@ commands = subparser
main :: IO ()
main = do
env <- Environment <$> (lookupEnv "BUUKA_HOME" >>= maybe defaultHome pure)
execParser (info (commands <**> helper) (fullDesc <> progDesc description)) >>= runBuukaM env
where
defaultHome = getXdgDirectory XdgData "buuka"
description = "Bookmarks manager. Stores the bookmarks in a yaml file under your xdg directory or in a folder specified by the BUUKA_HOME environment variable"
env <- Environment <$> getXdgDirectory XdgData "buuka"
execParser (info (commands <**> helper) fullDesc) >>= runBuukaM env