summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/clojure/io/cons/carddav_sync/authenticator_activity.clj8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/clojure/io/cons/carddav_sync/authenticator_activity.clj b/src/clojure/io/cons/carddav_sync/authenticator_activity.clj
index bf8025c..2f4d70a 100644
--- a/src/clojure/io/cons/carddav_sync/authenticator_activity.clj
+++ b/src/clojure/io/cons/carddav_sync/authenticator_activity.clj
@@ -32,11 +32,9 @@
(defn login
[_]
- (let [user (.toString (.getText user))
- password (.toString (.getText password))
- url (.toString (.getText url))]
- (.execute (io.cons.carddav_sync.login_task.)
- (into-array Object [user password url]))))
+ (.execute
+ (io.cons.carddav_sync.login_task.)
+ (into-array Object (map #(.. % (getText) (toString)) [user password url]))))
(defelement :frame-layout
:classname android.widget.FrameLayout