summaryrefslogtreecommitdiff
path: root/Backend
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-16 16:20:49 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-16 16:20:49 -0400
commit909f619c07699fe6c76d40bb4649e07737a0b9ae (patch)
tree3d284a54f5bf70e2ac11d249bfa721963affb5be /Backend
parent6d13ae10cf1d295b64855984f5a526f8209f3341 (diff)
tweaks
Diffstat (limited to 'Backend')
-rw-r--r--Backend/File.hs1
-rw-r--r--Backend/SHA1.hs3
-rw-r--r--Backend/URL.hs1
-rw-r--r--Backend/WORM.hs7
4 files changed, 8 insertions, 4 deletions
diff --git a/Backend/File.hs b/Backend/File.hs
index c443b4f7a..f5237f721 100644
--- a/Backend/File.hs
+++ b/Backend/File.hs
@@ -15,6 +15,7 @@ import System.IO
import System.Cmd
import System.Exit
import Control.Exception
+
import BackendTypes
import LocationLog
import Locations
diff --git a/Backend/SHA1.hs b/Backend/SHA1.hs
index 8c7c99bbd..c01e01a72 100644
--- a/Backend/SHA1.hs
+++ b/Backend/SHA1.hs
@@ -3,8 +3,9 @@
module Backend.SHA1 (backend) where
-import qualified Backend.File
import Data.Digest.Pure.SHA
+
+import qualified Backend.File
import BackendTypes
backend = Backend.File.backend {
diff --git a/Backend/URL.hs b/Backend/URL.hs
index 4e87ca4c2..9e64e0499 100644
--- a/Backend/URL.hs
+++ b/Backend/URL.hs
@@ -7,6 +7,7 @@ import Control.Monad.State (liftIO)
import Data.String.Utils
import System.Cmd
import System.Exit
+
import BackendTypes
backend = Backend {
diff --git a/Backend/WORM.hs b/Backend/WORM.hs
index 9a1e17ec5..420f336e9 100644
--- a/Backend/WORM.hs
+++ b/Backend/WORM.hs
@@ -4,14 +4,15 @@
module Backend.WORM (backend) where
import Control.Monad.State
-import qualified Backend.File
-import BackendTypes
-import Utility
import System.FilePath
import System.Posix.Files
import Data.Digest.Pure.SHA -- slow, but we only checksum filenames
import qualified Data.ByteString.Lazy.Char8 as B
+import qualified Backend.File
+import BackendTypes
+import Utility
+
backend = Backend.File.backend {
name = "WORM",
getKey = keyValue