snaplet-mysql-simple 0.2.0.0 → 0.2.0.1

raw patch · 5 files changed

+14/−6 lines, 5 files

Files

• Changelog.md +9/−0
• resources/db/devel.cfg +2/−2
• snaplet-mysql-simple.cabal +2/−1
• src/Snap/Snaplet/Auth/Backends/MysqlSimple.hs +0/−2
• src/Snap/Snaplet/MysqlSimple.hs +1/−1

@@ -0,0 +1,9 @@+## Version 0.2++Do not export `withTransaction` as it was broken. It needs a different kind+of transaction pool.++## Version 0.1++Very straightforward port from `snaplet-postgresql-simple`.+

@@ -1,8 +1,8 @@ host = "localhost" port = 3306 user = "mysql"-password = ""-dbname = "testdb"+pass = ""+db = "testdb"  # Nmuber of distinct connection pools to maintain.  The smallest acceptable # value is 1.

@@ -1,5 +1,5 @@ name:           snaplet-mysql-simple-version:        0.2.0.0+version:        0.2.0.1 synopsis:       mysql-simple snaplet for the Snap Framework description:    This snaplet contains support for using the MariaDB and MySQL                 database with a Snap Framework application via the mysql-simple@@ -15,6 +15,7 @@ category:       Web, Snap  extra-source-files:  LICENSE+                   , Changelog.md  data-files:   resources/db/devel.cfg

@@ -78,7 +78,6 @@     let tableDesc = defAuthTable { tblName = authTable }     let manager = MysqlAuthManager tableDesc $                                       mysqlPool $ db ^# snapletValue-                                      -- ^ XXX     liftIO $ createTableIfMissing manager     rng <- liftIO mkRNG     return $ AuthManager@@ -358,4 +357,3 @@                 , " = ?"                 ]         authExecute pamConnPool q [userLogin]-

@@ -102,7 +102,7 @@ import           Prelude hiding ((++)) import           Control.Lens -- (ASetter(), camelCaseFields, makeLensesWith, set) import           Control.Monad.CatchIO (MonadCatchIO)-import qualified Control.Monad.CatchIO as CIO+-- import qualified Control.Monad.CatchIO as CIO import           Control.Monad.IO.Class import           Control.Monad.State import           Control.Monad.Trans.Reader