From 9d4c809c68d168614d1a0e8ae4a18799fb6ea91f Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 29 Oct 2012 16:23:22 -0400 Subject: remove brokendebug --- Assistant/Common.hs | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'Assistant') 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 -- cgit v1.2.3