convert all commands to work with optparse-applicative

Still no options though.
This commit is contained in:
Joey Hess 2015-07-08 15:08:02 -04:00
parent 3125da54f6
commit 6e5c1f8db3
99 changed files with 391 additions and 297 deletions

View file

@ -22,9 +22,10 @@ import System.IO.HVFS
import System.IO.HVFS.Utils
cmd :: Command
cmd = addCheck check $ command "uninit" paramPaths
SectionUtility "de-initialize git-annex and clean out repository"
(commandParser seek)
cmd = addCheck check $
command "uninit" SectionUtility
"de-initialize git-annex and clean out repository"
paramPaths (withParams seek)
check :: Annex ()
check = do