git-annex/Types/BranchState.hs

17 lines
418 B
Haskell
Raw Normal View History

{- git-annex BranchState data type
-
- Copyright 2011 Joey Hess <id@joeyh.name>
-
- Licensed under the GNU GPL version 3 or higher.
-}
module Types.BranchState where
2012-12-20 03:41:54 +00:00
data BranchState = BranchState
{ branchUpdated :: Bool -- has the branch been updated this run?
, indexChecked :: Bool -- has the index file been checked to exist?
}
startBranchState :: BranchState
2012-12-20 03:41:54 +00:00
startBranchState = BranchState False False