mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

remove brokendebug

Browse source
This commit is contained in:
Joey Hess 2012-10-29 16:23:22 -04:00
parent 5d57b28a34
commit 805ef65679
1 changed files with 1 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Assistant/Common.hs
View file

@ -10,8 +10,7 @@ module Assistant.Common (
ThreadName,
NamedThread(..),
runNamedThread,
debug,
brokendebug
debug
) where
import Common.Annex as X
@ -25,9 +24,6 @@ import qualified Control.Exception as E
type ThreadName = String
data NamedThread = NamedThread ThreadName (Assistant ())
brokendebug :: ThreadName -> [String] -> IO ()
brokendebug _ _ = noop -- TODO remove this
debug :: [String] -> Assistant ()
debug ws = do
name <- getAssistant threadName