moved files around

This commit is contained in:
Joey Hess 2011-08-20 16:11:42 -04:00
parent ec746c511f
commit 737b5d14c9
19 changed files with 28 additions and 30 deletions

View file

@ -24,7 +24,7 @@ import Types
import Content
import Messages
import Utility
import Touch
import Utility.Touch
import Locations
command :: [Command]

View file

@ -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]

View 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)

View file

@ -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]