diff --git a/src/clojsa/saclient.clj b/src/clojsa/saclient.clj index 4434b90..4494ead 100644 --- a/src/clojsa/saclient.clj +++ b/src/clojsa/saclient.clj @@ -21,7 +21,6 @@ query {:pagenumber page}] {:href base-url :params query}))) - (defn login-response [username password session] (with-open [client (http/create-client)] (let [login-url (str url "account.php") @@ -55,4 +54,6 @@ headers (http/headers resp)] (-> resp http/await - http/string)))) + http/body + .toByteArray + (String. "windows-1252")))))