mirror of https://github.com/voidlizard/hbs2
18 lines
351 B
Haskell
18 lines
351 B
Haskell
module HBS2.Git.DashBoard.Fixme where
|
|
|
|
import HBS2.Git.DashBoard.Prelude
|
|
import HBS2.Git.DashBoard.Types
|
|
import HBS2.Git.DashBoard.State
|
|
|
|
import Fixme.State
|
|
import Fixme.Types
|
|
|
|
withFixme :: (DashBoardPerks m, MonadReader DashBoardEnv m) => RepoLww -> FixmeM m a -> m ()
|
|
withFixme repo m = do
|
|
p <- fixmeDataPath (coerce repo)
|
|
debug $ pretty p
|
|
|
|
|
|
|
|
|