snaplet-mysql-simple 0.1.1.2 → 0.1.1.3

raw patch · 2 files changed

+2/−4 lines, 2 files

Files

• snaplet-mysql-simple.cabal +1/−1
• src/Snap/Snaplet/MysqlSimple.hs +1/−3

@@ -1,5 +1,5 @@ name:           snaplet-mysql-simple-version:        0.1.1.2+version:        0.1.1.3 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

@@ -99,8 +99,6 @@   , M.defaultConnectInfo   ) where -import Debug.Trace- import           Prelude hiding ((++)) import           Control.Lens -- (ASetter(), camelCaseFields, makeLensesWith, set) import           Control.Monad.CatchIO (MonadCatchIO)@@ -193,7 +191,7 @@      connInfo <- foldl modRecord (return M.defaultConnectInfo) params -    trace (show connInfo) $ return $ set connectSSL (Just sslOpts) $ set connectOptions connOpts connInfo+    return $ set connectSSL (Just sslOpts) $ set connectOptions connOpts connInfo   where params =             [ ("host", set connectHost)             , ("port", set connectPort . read)