diff options
-rw-r--r-- | src/clojure/io/cons/carddav_sync/authenticator_activity.clj | 8 |
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 |