Merge branch 'pr/218'

Author: dakrone

src/clj_http/cookies.clj

@@ -137,3 +137,13 @@
   [^CookieStore cookie-store]
   (when cookie-store
     (into {} (map to-cookie (.getCookies cookie-store)))))
+
+(defn add-cookie
+  "Add a ClientCookie to a cookie-store"
+  [^CookieStore cookie-store ^ClientCookie cookie]
+  (.addCookie cookie-store cookie))
+
+(defn clear-cookies
+ "Clears all cookies from cookie-store"
+  [^CookieStore cookie-store]
+  (.clear cookie-store))