X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FBackend.hs;h=0de431e60ce29aa6a223ce9916110c6b596c6cee;hb=cdd0f36ab4aa8aadc416f6b9cbe6117c26d2ddf2;hp=04cf6ca3854891a8d9a9947567f2bf88d8ee7b79;hpb=ce611b60b9c42e176b215453f0d0f862d2d5d0fd;p=dead%2Fhtsn-import.git diff --git a/src/Backend.hs b/src/Backend.hs index 04cf6ca..0de431e 100644 --- a/src/Backend.hs +++ b/src/Backend.hs @@ -10,7 +10,7 @@ import System.Console.CmdArgs.Default ( Default(..) ) -- | An enumeration type for the allowed database backends. data Backend = Sqlite | Postgres - deriving (Data, Read, Show, Typeable) + deriving (Data, Eq, Read, Show, Typeable) instance Default Backend where def = Sqlite