diff options
Diffstat (limited to 'CmdLine.hs')
-rw-r--r-- | CmdLine.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/CmdLine.hs b/CmdLine.hs index 880f9de09..e6ee0c2e6 100644 --- a/CmdLine.hs +++ b/CmdLine.hs @@ -24,7 +24,6 @@ import Annex.Action import Annex.Environment import Command import Types.Messages -import Messages.Internal {- Runs the passed command line. -} dispatch :: Bool -> CmdParams -> [Command] -> [GlobalOption] -> [(String, String)] -> IO Git.Repo -> String -> String -> IO () @@ -46,9 +45,8 @@ dispatch fuzzyok allargs allcmds globaloptions fields getgitrepo progname progde whenM (annexDebug <$> Annex.getGitConfig) $ liftIO enableDebugOutput startup - withConcurrentOutput $ - performCommandAction cmd seek $ - shutdown $ cmdnocommit cmd + performCommandAction cmd seek $ + shutdown $ cmdnocommit cmd go (Left norepo) = do let ingitrepo = \a -> a =<< Git.Config.global -- Parse command line with full cmdparser first, |