diff options
author | Joey Hess <joey@kitenet.net> | 2011-06-01 21:56:04 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-06-01 21:56:04 -0400 |
commit | 703c437bd9c6cb9e4675b65ac2b107f76b135d71 (patch) | |
tree | a6f35036bdd2b33aca50fd899448a0f6e3b60507 /Backend | |
parent | 971ab27e7820a3228f71dd42f3e870c0fc2f4345 (diff) |
rename modules for data types into Types/ directory
Diffstat (limited to 'Backend')
-rw-r--r-- | Backend/File.hs | 4 | ||||
-rw-r--r-- | Backend/SHA.hs | 4 | ||||
-rw-r--r-- | Backend/URL.hs | 4 | ||||
-rw-r--r-- | Backend/WORM.hs | 4 |
4 files changed, 8 insertions, 8 deletions
diff --git a/Backend/File.hs b/Backend/File.hs index 543f02af7..bf21224a9 100644 --- a/Backend/File.hs +++ b/Backend/File.hs @@ -18,7 +18,7 @@ import Control.Monad.State (liftIO) import Data.List import Data.String.Utils -import BackendClass +import Types.Backend import LocationLog import qualified Remote import qualified GitRepo as Git @@ -28,7 +28,7 @@ import Types import UUID import Messages import Trust -import Key +import Types.Key backend :: Backend Annex backend = Backend { diff --git a/Backend/SHA.hs b/Backend/SHA.hs index 6d721038c..94ebe093e 100644 --- a/Backend/SHA.hs +++ b/Backend/SHA.hs @@ -17,15 +17,15 @@ import System.Posix.Files import System.FilePath import qualified Backend.File -import BackendClass import Messages import qualified Annex import Locations import Content import Types +import Types.Backend +import Types.Key import Utility import qualified SysConfig -import Key type SHASize = Int diff --git a/Backend/URL.hs b/Backend/URL.hs index 3068c3027..e41004dd4 100644 --- a/Backend/URL.hs +++ b/Backend/URL.hs @@ -10,10 +10,10 @@ module Backend.URL (backends) where import Control.Monad.State (liftIO) import Types -import BackendClass +import Types.Backend import Utility import Messages -import Key +import Types.Key backends :: [Backend Annex] backends = [backend] diff --git a/Backend/WORM.hs b/Backend/WORM.hs index b33c60763..dc2e48adc 100644 --- a/Backend/WORM.hs +++ b/Backend/WORM.hs @@ -12,9 +12,9 @@ import System.FilePath import System.Posix.Files import qualified Backend.File -import BackendClass +import Types.Backend import Types -import Key +import Types.Key backends :: [Backend Annex] backends = [backend] |