Integrate Persistent with Servant

Query my SQLite database from within my Servant handlers. Nothing I've written
is domain-specific to the business logic yet -- I'm just making sure everything
integrates.

src/Main.hs

@@ -1,5 +1,7 @@
 module Main where
+--------------------------------------------------------------------------------
+import qualified App
+--------------------------------------------------------------------------------
 
 main :: IO ()
-main = do
-  putStrLn "Working..."
+main = App.run "sqlite.db"