selda-sqlite 0.1.5.0 → 0.1.5.1
raw patch · 2 files changed
+5/−1 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- selda-sqlite.cabal +1/−1
- src/Database/Selda/SQLite.hs +4/−0
selda-sqlite.cabal view
@@ -1,5 +1,5 @@ name: selda-sqlite-version: 0.1.5.0+version: 0.1.5.1 synopsis: SQLite backend for the Selda database EDSL. description: SQLite backend for the Selda database EDSL. homepage: https://github.com/valderman/selda
src/Database/Selda/SQLite.hs view
@@ -16,6 +16,9 @@ -- explicitly closed using 'seldaClose' when no longer needed. sqliteOpen :: (MonadIO m, MonadCatch m) => FilePath -> m SeldaConnection sqliteOpen file = do+#ifdef __HASTE__+ error "sqliteOpen called in JS context"+#else edb <- try $ liftIO $ open (pack file) case edb of Left e@(SQLError{}) -> do@@ -25,6 +28,7 @@ let backend = sqliteBackend db liftIO $ runStmt backend "PRAGMA foreign_keys = ON;" [] newConnection backend absFile+#endif -- | Perform the given computation over an SQLite database. -- The database is guaranteed to be closed when the computation terminates.