mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

remove unused fields

Browse source
This commit is contained in:
Joey Hess 2012-12-19 23:41:54 -04:00
parent 3ef0ac2fa5
commit a6bd0076d4
1 changed files with 5 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
Types/BranchState.hs
View file

@ -7,14 +7,10 @@
module Types.BranchState where module Types.BranchState where
data BranchState = BranchState { data BranchState = BranchState
branchUpdated :: Bool, -- has the branch been updated this run? { branchUpdated :: Bool -- has the branch been updated this run?
indexChecked :: Bool, -- has the index file been checked to exist? , indexChecked :: Bool -- has the index file been checked to exist?
}
-- the content of one file is cached
cachedFile :: Maybe FilePath,
cachedContent :: String
}
startBranchState :: BranchState startBranchState :: BranchState
startBranchState = BranchState False False Nothing "" startBranchState = BranchState False False