From 66d092dc7c5731b75bd69887ae5b6a0e37625b90 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Thu, 20 Sep 2012 13:46:07 -0400
Subject: update

---
 Utility/Rsync.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'Utility/Rsync.hs')

diff --git a/Utility/Rsync.hs b/Utility/Rsync.hs
index 0fe4a8986..af76647fd 100644
--- a/Utility/Rsync.hs
+++ b/Utility/Rsync.hs
@@ -48,7 +48,10 @@ rsync = boolSystem "rsync"
 
 {- Runs rsync, but intercepts its progress output and feeds bytes
  - complete values into the callback. The progress output is also output
- - to stdout. -}
+ - to stdout. 
+ -
+ - The params must enable rsync's --progress mode for this to work.
+ -}
 rsyncProgress :: (Integer -> IO ()) -> [CommandParam] -> IO Bool
 rsyncProgress callback params = catchBoolIO $
 	withHandle StdoutHandle createProcessSuccess p (feedprogress [])
-- 
cgit v1.2.3