 
 (defn event-attendee-page [event-id attendee-id]
   (let [check-in-or-out
-        (fn [op url init callback]
-          (init)
+        (fn [op url callback]
           (op (str api-url url)
               {:format :json
                :keywords? true


            register
            (fn [form]
              (when (empty? errors)
                ; TODO: maybe this logic is wrong?MIght want to buy ticket even if not required
                (if (:RequiresPayment event)
                  (renew-stripe-token!
                    (fn [] (attendees-endpoint :create
                                               {:UserId (get-in @session [:user :UserId])
                                                :EventId event-id
                                                :Token (:stripe-token @session)
                                                :Amount (:TicketPrice event)}
                                               #(do
                                                  (swap! session dissoc :stripe-token)
                                                  (js/location.replace (events-route))))))
                  (attendees-endpoint :create
                                      {:UserId (get-in @session [:user :UserId])
                                       :EventId event-id}
                                      #(js/location.replace (events-route))))))]
        (when (seq event)
          [:div.ui.stackable.page.grid
           [:div.sixteen.wide.column

                         [:td (:Name activity)]
                         [:td (:Location activity)]
                         [:td.right.aligned {:noWrap true}
                          [action-button
                           {}
                           (if @checked-in
                             "Check out"
                             "Check in")
                           (if @checked-in
                             (activity-check-out schedule-id checked-in)
                             (activity-check-in schedule-id checked-in))
                           (if @checked-in
                             "Check in"
                             "Check out")]]])))]]]]]]))))))

(defn event-register-page [event-id]
  (let [form (atom {:Email (get-in @session [:user :Email])
