Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Exports

  • Loading branch information...
commit 84dc20aac76d7aa7a3e5e7d7b45b054797f6578c 1 parent a59407f
@akaspin authored
Showing with 3 additions and 2 deletions.
  1. +3 −2 src/Database/CouchDB/Conduit/Design.hs
View
5 src/Database/CouchDB/Conduit/Design.hs
@@ -3,7 +3,9 @@
-- | High-level API for CouchDB design documents. These methods are very
-- convenient for bootstrapping and testing.
-module Database.CouchDB.Conduit.Design where
+module Database.CouchDB.Conduit.Design (
+ couchViewPut
+) where
import Prelude hiding (catch)
import Control.Exception.Lifted (catch)
@@ -20,7 +22,6 @@ import qualified Data.Aeson.Types as AT
import Database.CouchDB.Conduit (MonadCouch, CouchError, Path, mkPath, Revision)
import Database.CouchDB.Conduit.Internal.Doc (couchGetWith, couchPutWith)
-
-- | Put view in design document. If design document does not exist, it
-- will be created.
couchViewPut :: MonadCouch m =>
Please sign in to comment.
Something went wrong with that request. Please try again.