diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-09-20 13:46:07 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-09-20 13:46:07 -0400 |
| commit | 66d092dc7c5731b75bd69887ae5b6a0e37625b90 (patch) | |
| tree | 6780e06e535d12f4e178a483cb2cad1af31a2c0d /Utility/Rsync.hs | |
| parent | 19e35f7f0d6f87f20dca3e30a74e5700bbb86d84 (diff) | |
update
Diffstat (limited to 'Utility/Rsync.hs')
| -rw-r--r-- | Utility/Rsync.hs | 5 |
1 files changed, 4 insertions, 1 deletions
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 []) |