diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-07-04 02:36:02 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-07-04 02:36:02 -0400 |
| commit | 6b3a9cdaddec120f27e947e03ece5ee2ebde1d14 (patch) | |
| tree | 14ee0b96ed66ba71fe2843f002f4f56f915c9ff5 /Assistant | |
| parent | 8a7785e219c5aa08e0c91a813022e03cb92f16a3 (diff) | |
moved AssociatedFile definition
Diffstat (limited to 'Assistant')
| -rw-r--r-- | Assistant/Drop.hs | 2 | ||||
| -rw-r--r-- | Assistant/TransferrerPool.hs | 1 | ||||
| -rw-r--r-- | Assistant/Types/TransferQueue.hs | 1 |
3 files changed, 1 insertions, 3 deletions
diff --git a/Assistant/Drop.hs b/Assistant/Drop.hs index 1fc2f75d9..d677a69c8 100644 --- a/Assistant/Drop.hs +++ b/Assistant/Drop.hs @@ -11,7 +11,7 @@ import Assistant.Common import Assistant.DaemonStatus import Logs.Location import Logs.Trust -import Types.Remote (AssociatedFile, uuid) +import Types.Remote (uuid) import qualified Remote import qualified Command.Drop import Command diff --git a/Assistant/TransferrerPool.hs b/Assistant/TransferrerPool.hs index 68ec743f8..d9104f74d 100644 --- a/Assistant/TransferrerPool.hs +++ b/Assistant/TransferrerPool.hs @@ -16,7 +16,6 @@ import Control.Concurrent.STM import System.Process (create_group) import Control.Exception (throw) import Control.Concurrent -import Types.Remote (AssociatedFile) {- Runs an action with a Transferrer from the pool. -} withTransferrer :: FilePath -> TransferrerPool -> (Transferrer -> IO a) -> IO a diff --git a/Assistant/Types/TransferQueue.hs b/Assistant/Types/TransferQueue.hs index e4e305d5a..e4bf2ae92 100644 --- a/Assistant/Types/TransferQueue.hs +++ b/Assistant/Types/TransferQueue.hs @@ -9,7 +9,6 @@ module Assistant.Types.TransferQueue where import Common.Annex import Logs.Transfer -import Types.Remote import Control.Concurrent.STM import Utility.TList |