1. Kamil Ciemniewski
  2. snaplet-mongoDB

Source

snaplet-mongoDB / src / Snap / Snaplet / Auth / Backends / MongoDB.hs

Diff from to

File src/Snap/Snaplet/Auth/Backends/MongoDB.hs

-<<<<<<< HEAD
-
-module Snap.Snaplet.Auth.Backends.MongoDB where
-
-=======
 {-# LANGUAGE TemplateHaskell, TypeFamilies, QuasiQuotes #-}
 
 -- | This module containes MongoDB backend implementation
   --destroy :: MongoDBAuthManager -> AuthUser -> IO ()
   destroy mgr u = withMgr mgr $ do
     withDB' $ deleteWhere ([mongo| { userId: #{userId u}, userLogin: #{userLogin u}, userRememberToken: #{userRememberToken u} } |] :: Document AuthUser)
->>>>>>> release/0.3