summaryrefslogtreecommitdiff
path: root/Assistant
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-08-29 15:45:48 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-08-29 15:45:48 -0400
commita4fa31ffa1b84412c02c6e70046602f390c7c698 (patch)
tree526d4713c29ab554352480a20c5c9045b88891d7 /Assistant
parent476d36ed16c2afaf881b5ed886fe3abefc773fc3 (diff)
remove debug print
Diffstat (limited to 'Assistant')
-rw-r--r--Assistant/WebApp/DashBoard.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/Assistant/WebApp/DashBoard.hs b/Assistant/WebApp/DashBoard.hs
index f21295bf6..7a01401c6 100644
--- a/Assistant/WebApp/DashBoard.hs
+++ b/Assistant/WebApp/DashBoard.hs
@@ -45,7 +45,6 @@ transfersDisplay warnNoScript = do
queued <- liftIO $ getTransferQueue $ transferQueue webapp
let ident = "transfers"
autoUpdate ident NotifierTransfersR (10 :: Int) (10 :: Int)
- liftIO $ print ("current", current)
let transfers = simplifyTransfers $ current ++ queued
if null transfers
then ifM (lift $ showIntro <$> getWebAppState)