From dcd2cfeb6bc074bfd7705ce633b8a93a7e11fb72 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 3 Apr 2015 20:10:32 -0400 Subject: dead code --- Messages/Progress.hs | 10 ---------- 1 file changed, 10 deletions(-) (limited to 'Messages/Progress.hs') diff --git a/Messages/Progress.hs b/Messages/Progress.hs index 177af61f9..acc237017 100644 --- a/Messages/Progress.hs +++ b/Messages/Progress.hs @@ -49,16 +49,6 @@ showProgressDots :: Annex () showProgressDots = handleMessage q $ flushed $ putStr "." -{- Runs a command, the output of which is some sort of progress display. - - - - Normally, this is displayed to the user. - - - - In QuietOutput mode, both the stdout and stderr are discarded, - - unless the command fails, in which case stderr will be displayed. - -} -progressOutput :: FilePath -> [CommandParam] -> Annex Bool -progressOutput cmd ps = undefined - mkProgressHandler :: MeterUpdate -> Annex ProgressHandler mkProgressHandler meter = ProgressHandler <$> quietmode -- cgit v1.2.3