summaryrefslogtreecommitdiff
path: root/Types/BranchState.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-19 23:41:54 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-19 23:41:54 -0400
commitd02aab38b6d84479439ab88001f3a1f85e1940d1 (patch)
treea067dd798ec8aaa5bef7b99e8f2cd0a1a90a0410 /Types/BranchState.hs
parent066ee1c9dcd01649ae4acc665079d9a5cf525b54 (diff)
remove unused fields
Diffstat (limited to 'Types/BranchState.hs')
-rw-r--r--Types/BranchState.hs14
1 files changed, 5 insertions, 9 deletions
diff --git a/Types/BranchState.hs b/Types/BranchState.hs
index e5b2291f3..2f7948ebb 100644
--- a/Types/BranchState.hs
+++ b/Types/BranchState.hs
@@ -7,14 +7,10 @@
module Types.BranchState where
-data BranchState = BranchState {
- branchUpdated :: Bool, -- has the branch been updated this run?
- indexChecked :: Bool, -- has the index file been checked to exist?
-
- -- the content of one file is cached
- cachedFile :: Maybe FilePath,
- cachedContent :: String
-}
+data BranchState = BranchState
+ { branchUpdated :: Bool -- has the branch been updated this run?
+ , indexChecked :: Bool -- has the index file been checked to exist?
+ }
startBranchState :: BranchState
-startBranchState = BranchState False False Nothing ""
+startBranchState = BranchState False False