tweaks

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

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 {

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 {

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