   "Runs a query for a book by title and author.
   Returns only the last 20 results."
   [consumer access-token title author]
-  (let [search-url "https://www.goodreads.com/search/index"
+  (let [search-url (build-url "search" "index")
         params {:q (str title " " author)
                 :format "xml"}
         resp (make-auth-request-GET consumer

(defn add-book-review
  "Add a book review. Automatically adds book to read shelf."
  [consumer access-token book-id rating & [review-text]]
  (let [review-url "https://www.goodreads.com/review"
        params (merge {:format "xml"
                       :book_id book-id
                       (keyword "review[rating") rating


(defn get-user-friends
  [consumer access-token user-id]
  (let [friends-url (build-url "friend" "user.xml")
        params {:id user-id}
        resp (make-auth-request-GET consumer
                                    access-token
