 (defn fill-future-date [e2e-tag]
   (fill-date e2e-tag ".next"))
 
+(defn fill-location [location]
+  (taxi/send-keys (e2e-selector "input-conference-location") location)
+  (Thread/sleep 1000)
+  (taxi/send-keys (e2e-selector "input-conference-location") Keys/ARROW_DOWN)
+  (taxi/send-keys (e2e-selector "input-conference-location") Keys/ENTER))
+
 (defn text [e2e-tag]
   (taxi/text (e2e-selector e2e-tag)))
+
+(defn value [e2e-tag]
+  (taxi/value (e2e-selector e2e-tag)))
 
 (defn texts [e2e-tag]
   (map core/text (taxi/find-elements {:css (e2e-selector e2e-tag)})))

                   "input-conference-name"        past-conference-name
                   "input-conference-link"        past-conference-link
                   "input-conference-description" past-conference-description})
      (fill-past-date "date-conference-from")
      (fill-past-date "date-conference-to")
      (click "button-create-conference")

  (let [conference-series (str "some unique series" (UUID/randomUUID))
        past-conference-name (str "some unique conference name" (UUID/randomUUID))
        past-conference-link "www.some-link.org"
        past-conference-location-search-term "CCH - Congress Center"
        past-conference-location-name "CCH - Congress Center Hamburg"
        past-conference-location-address "Am Dammtor / Marseiller Straße, 20355 Hamburg, Germany"
        past-conference-description "some really fancy description with a new line.\nAnd here is the new line. Wohooo!"
        future-conference-name (str "some other unique conference name" (UUID/randomUUID))]

