                     posting, but we do encourage you to talk with your
                     coworkers!"]]]
             [:p]
-            [:input.btn
-            {:on-click #(do
+            (button/button
+             {:on-click #(do
                           (set-beta-program-preference! owner true)
-                          ((om/get-shared owner :track-event) {:event-type :beta-accept-terms-clicked}))
-             :type "submit"
-             :value "Accept"}]])]]))))
+                          ((om/get-shared owner :track-event) {:event-type :beta-accept-terms-clicked}))}
+             "Accept")])]]))))
 
 (defn beta-program-member [app owner]
   (reify

         features and settings before they are released publicly!"]
        [:form
         (if (not clicked-join?)
           [:input.btn
            {:on-click #(do
                          (om/set-state! owner :clicked-join? true)
                          ((om/get-shared owner :track-event) {:event-type :beta-join-clicked}))
             :type "submit"
             :value "Join Beta Program"}]
           [:div
            [:div.card
             [:h1 "Beta Terms"]

        [:div
         [:p "Thanks for being part of the beta program.  We'll let you know when we release updates so you'll be the first to see new features!" ]
         [:p "We'd love to know what you think - " [:a {:href "mailto:beta@circleci.com"} "send us your feedback"] "!"]
         (button/button
          {:on-click #(do
                       (set-beta-program-preference! owner false)
                       ((om/get-shared owner :track-event) {:event-type :beta-leave-clicked}))
           :primary? true}
          "Leave Beta Program")]
        (comment
          ;; uncomment to turn on beta sub programs
          [:hr]
