From acec36711090577752532a39f472e734e6b67fdb Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 31 Oct 2012 02:34:03 -0400 Subject: where indentation --- Assistant/Threads/TransferWatcher.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'Assistant/Threads/TransferWatcher.hs') diff --git a/Assistant/Threads/TransferWatcher.hs b/Assistant/Threads/TransferWatcher.hs index 7b789b8b6..7deafb14d 100644 --- a/Assistant/Threads/TransferWatcher.hs +++ b/Assistant/Threads/TransferWatcher.hs @@ -76,10 +76,10 @@ onModify file = do case parseTransferFile file of Nothing -> noop Just t -> go t =<< liftIO (readTransferInfoFile Nothing file) - where - go _ Nothing = noop - go t (Just newinfo) = alterTransferInfo t $ - \i -> i { bytesComplete = bytesComplete newinfo } + where + go _ Nothing = noop + go t (Just newinfo) = alterTransferInfo t $ + \i -> i { bytesComplete = bytesComplete newinfo } {- This thread can only watch transfer sizes when the DirWatcher supports - tracking modificatons to files. -} -- cgit v1.2.3