summaryrefslogtreecommitdiff
path: root/Annex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-11-22 14:06:31 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-11-22 14:06:31 -0400
commit7f7ae7a3b1cdfbc61879189dfe04a637690015aa (patch)
tree842546a50ff6def034f19a0e6e5c616a66d9a9d5 /Annex.hs
parentfc2f0e8b1a4bd016ac29606381dfb7034c88e9f5 (diff)
find: Support --print0
It would be nice if command-specific options were supported. The first difficulty is that which command is being called is not known until after getopt; but that could be worked around by finding the first non-dashed parameter. Storing the settings without putting them in the annex monad is the next difficulty; it could perhaps be handled by making the seek stage pass applicable settings into the start stage (and from there on to perform as needed). But that still leaves a problem, what data type to use to represent the options between getopt and seek?
Diffstat (limited to 'Annex.hs')
-rw-r--r--Annex.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Annex.hs b/Annex.hs
index 24cc78a64..6d245a92d 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -60,6 +60,7 @@ data AnnexState = AnnexState
, force :: Bool
, fast :: Bool
, auto :: Bool
+ , print0 :: Bool
, branchstate :: BranchState
, catfilehandle :: Maybe CatFileHandle
, forcebackend :: Maybe String
@@ -82,6 +83,7 @@ newState gitrepo = AnnexState
, force = False
, fast = False
, auto = False
+ , print0 = False
, branchstate = startBranchState
, catfilehandle = Nothing
, forcebackend = Nothing