Bump opium

app/Main.hs

@@ -9,7 +9,7 @@ import qualified Database.PostgreSQL.Opium as Opium
 import qualified Yore.DB
 
 main :: IO ()
-main = bracket (Opium.connect "host=localhost port=5432 user=yore-test dbname=yore-test") Opium.close $ \conn -> do
+main = bracket unsafeConnect Opium.close $ \conn -> do
   result <- Yore.DB.getTables conn
 
   case result of
@@ -17,3 +17,5 @@ main = bracket (Opium.connect "host=localhost port=5432 user=yore-test dbname=yo
       putStrLn $ "Got error: " ++ show e
     Right rows ->
       mapM_ print rows
+  where
+    unsafeConnect = either (error . show) id <$> Opium.connect "host=localhost port=5432 user=yore-test dbname=yore-test"