delete :: String -> String -> AppM ()
delete eid rev = do
    url <- viewA agonCouchDBURL >>= return . (++ (eid ++ "?rev=" ++ rev))
    req <- buildReq url "DELETE" noBody
    http' req

---
---
---
delete :: String -> String -> AppM ()
delete eid rev = do
    url <- viewA agonCouchDBURL >>= return . (++ (eid ++ "?rev=" ++ rev))
    req <- buildReq url "DELETE" noBody
    http' req

---
---
---
delete eid rev = do
    url <- viewA agonCouchDBURL >>= return . (++ (eid ++ "?rev=" ++ rev))
    req <- buildReq url "DELETE" noBody
    http' req

---
---
---