diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-29 16:23:22 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-29 16:23:22 -0400 |
| commit | 9d4c809c68d168614d1a0e8ae4a18799fb6ea91f (patch) | |
| tree | 5711199c24902b28ac19ef236735b01c6edef131 | |
| parent | 47f4506a1ed1d98d3bdae0de24e00f2eb64611da (diff) | |
remove brokendebug
| -rw-r--r-- | Assistant/Common.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/Assistant/Common.hs b/Assistant/Common.hs index b46d3342a..30c73de43 100644 --- a/Assistant/Common.hs +++ b/Assistant/Common.hs @@ -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 |