diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-04-03 20:10:32 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-04-03 20:10:32 -0400 |
| commit | dcd2cfeb6bc074bfd7705ce633b8a93a7e11fb72 (patch) | |
| tree | bb5a1aea17287869073be525084e0296a13041a4 | |
| parent | 7cf20a83bdaf1a3244df74346e9ff026e4ef53b3 (diff) | |
dead code
| -rw-r--r-- | Messages/Progress.hs | 10 |
1 files changed, 0 insertions, 10 deletions
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 |