diff options
author | Joey Hess <joey@kitenet.net> | 2011-01-25 21:49:04 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-01-25 21:49:04 -0400 |
commit | 082b022f9ae56b1446b6607cf7851cd4f1d4f904 (patch) | |
tree | 4712d36e841bca351c9aa68a911c4fb82188b4c1 /Options.hs | |
parent | 109a719b03dbeb70eb317be17f7e18567efa9dac (diff) |
successfully split Annex and AnnexState out of TypeInternals
Diffstat (limited to 'Options.hs')
-rw-r--r-- | Options.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Options.hs b/Options.hs index 5f367c9dd..2d4bb85fb 100644 --- a/Options.hs +++ b/Options.hs @@ -18,10 +18,10 @@ import Command -} type Option = OptDescr (Annex ()) -storeOptBool :: FlagName -> Bool -> Annex () -storeOptBool name val = Annex.flagChange name $ FlagBool val -storeOptString :: FlagName -> String -> Annex () -storeOptString name val = Annex.flagChange name $ FlagString val +storeOptBool :: Annex.FlagName -> Bool -> Annex () +storeOptBool name val = Annex.flagChange name $ Annex.FlagBool val +storeOptString :: Annex.FlagName -> String -> Annex () +storeOptString name val = Annex.flagChange name $ Annex.FlagString val commonOptions :: [Option] commonOptions = |