Skip to content

Commit

Permalink
Add support for fetching results from CouchDB list functions.
Browse files Browse the repository at this point in the history
  • Loading branch information
Doug Kirk committed Oct 26, 2016
1 parent e8e83fc commit b75d9ac
Show file tree
Hide file tree
Showing 3 changed files with 15 additions and 6 deletions.
4 changes: 2 additions & 2 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ Clutch is a [Clojure](http://clojure.org) library for [Apache CouchDB](http://co
To include Clutch in your project, simply add the following to your `project.clj` dependencies:

```clojure
[com.ashafa/clutch "0.4.1"]
[com.ashafa/clutch "0.5.0"]
```

Or, if you're using Maven, add this dependency to your `pom.xml`:
Expand All @@ -16,7 +16,7 @@ Or, if you're using Maven, add this dependency to your `pom.xml`:
<dependency>
<groupId>com.ashafa</groupId>
<artifactId>clutch</artifactId>
<version>0.4.0</version>
<version>0.5.0</version>
</dependency>
```

Expand Down
6 changes: 3 additions & 3 deletions project.clj
Original file line number Diff line number Diff line change
@@ -1,13 +1,13 @@
(defproject com.ashafa/clutch "0.4.1"
(defproject com.ashafa/clutch "0.5.0"
:description "A Clojure library for Apache CouchDB."
:url "https://github.com/clojure-clutch/clutch/"
:license {:name "BSD"
:url "http://www.opensource.org/licenses/BSD-3-Clause"}
:dependencies [[org.clojure/clojure "1.8.0"]

[clj-http "3.1.0"]
[clj-http "3.3.0"]
[cheshire "5.6.3"]
[commons-codec "1.6"]
[commons-codec "1.10"]
[com.cemerick/url "0.1.1"]

[org.clojure/clojurescript "1.8.40" :optional true
Expand Down
11 changes: 10 additions & 1 deletion src/com/ashafa/clutch.clj
Original file line number Diff line number Diff line change
Expand Up @@ -3,8 +3,8 @@
[cheshire.core :as json]
[clojure.java.io :as io]
[cemerick.url :as url]
[com.ashafa.clutch.http-client :refer :all]
clojure.string)
(:use com.ashafa.clutch.http-client)
(:import (java.io File FileInputStream BufferedInputStream InputStream ByteArrayOutputStream)
(java.net URL))
(:refer-clojure :exclude (conj! assoc! dissoc!)))
Expand Down Expand Up @@ -396,6 +396,15 @@
(utils/url db "_design" (name design-document) "_update" (name update-function-name) id)
:data body))

(defdbop get-list
"Get list views associated with a design document.
Also takes an optional map for querying options.
No support for views in design documents other than the one containing the list view."
[db design-document list-key view-key & [query-params-map]]
(let [url (assoc (utils/url db "_design" (name design-document) "_list" (name list-key) (name view-key))
:query query-params-map)]
(couchdb-request :get url)))
;;;; _changes

(defdbop changes
Expand Down

0 comments on commit b75d9ac

Please sign in to comment.