File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -555,7 +555,7 @@ on each command), and commands can be added with the `command`
555555modifier. For example,
556556
557557```haskell
558- subparser
558+ hsubparser
559559 ( command " add" (info addCommand ( progDesc " Add a file to the repository" ))
560560 <> command " commit" (info commitCommand ( progDesc " Record changes to the repository" ))
561561 )
@@ -573,7 +573,7 @@ start :: String -> IO ()
573573stop :: IO ()
574574
575575opts :: Parser (IO () )
576- opts = subparser
576+ opts = hsubparser
577577 ( command " start" (info (start <$> argument str idm) idm)
578578 <> command " stop" (info (pure stop) idm) )
579579
@@ -810,11 +810,11 @@ hello :: Parser Sample
810810hello = Hello <$> many (argument str (metavar " TARGET..." ))
811811
812812sample :: Parser Sample
813- sample = subparser
813+ sample = hsubparser
814814 ( command " hello" (info hello (progDesc " Print greeting" ))
815815 <> command " goodbye" (info (pure Goodbye ) (progDesc " Say goodbye" ))
816816 )
817- <|> subparser
817+ <|> hsubparser
818818 ( command " bonjour" (info hello (progDesc " Print greeting" ))
819819 <> command " au-revoir" (info (pure Goodbye ) (progDesc " Say goodbye" ))
820820 <> commandGroup " French commands:"
You can’t perform that action at this time.
0 commit comments