moved files around
This commit is contained in:
parent
ec746c511f
commit
737b5d14c9
19 changed files with 28 additions and 30 deletions
|
@ -24,7 +24,7 @@ import Types
|
|||
import Content
|
||||
import Messages
|
||||
import Utility
|
||||
import Touch
|
||||
import Utility.Touch
|
||||
import Locations
|
||||
|
||||
command :: [Command]
|
||||
|
|
|
@ -14,7 +14,7 @@ import System.Directory
|
|||
|
||||
import Command
|
||||
import qualified Backend
|
||||
import qualified Remote.Helper.Url
|
||||
import qualified Utility.Url as Url
|
||||
import qualified Remote.Web
|
||||
import qualified Command.Add
|
||||
import qualified Annex
|
||||
|
@ -53,7 +53,7 @@ download url file = do
|
|||
let dummykey = Backend.URL.fromUrl url
|
||||
let tmp = gitAnnexTmpLocation g dummykey
|
||||
liftIO $ createDirectoryIfMissing True (parentDir tmp)
|
||||
ok <- Remote.Helper.Url.download url tmp
|
||||
ok <- Url.download url tmp
|
||||
if ok
|
||||
then do
|
||||
[(_, backend)] <- Backend.chooseBackends [file]
|
||||
|
|
|
@ -22,7 +22,7 @@ import Types
|
|||
import Utility
|
||||
import UUID
|
||||
import Trust
|
||||
import Remote.Helper.Ssh
|
||||
import Utility.Ssh
|
||||
import qualified Utility.Dot as Dot
|
||||
|
||||
-- a link from the first repository to the second (its remote)
|
||||
|
|
|
@ -12,7 +12,7 @@ import Data.String.Utils
|
|||
import Data.Maybe
|
||||
|
||||
import Command
|
||||
import qualified SysConfig
|
||||
import qualified Build.SysConfig as SysConfig
|
||||
import Version
|
||||
|
||||
command :: [Command]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue