From 9ad09558eb6c9f7ed651168a030e26bc5698c1b8 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 24 Mar 2013 18:28:21 -0400 Subject: add section metadata to all commands Not yet used .. mindless train work. --- Types/Command.hs | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'Types') diff --git a/Types/Command.hs b/Types/Command.hs index b652bdad5..1d64c16d1 100644 --- a/Types/Command.hs +++ b/Types/Command.hs @@ -42,6 +42,7 @@ data Command = Command , cmdname :: String , cmdparamdesc :: String -- description of params for usage , cmdseek :: [CommandSeek] -- seek stage + , cmdsection :: CommandSection , cmddesc :: String -- description of command for usage } @@ -55,3 +56,13 @@ instance Eq Command where {- Order commands by name -} instance Ord Command where compare = comparing cmdname + +{- The same sections are listed in doc/git-annex.mdwn -} +data CommandSection + = SectionCommon + | SectionSetup + | SectionMaintenance + | SectionQuery + | SectionUtility + | SectionPlumbing + deriving (Eq, Ord, Enum, Bounded) -- cgit v1.2.3