    component)."
   []
   (let [console  (subscribe [:get-console :cljs-console])
-        created? (subscribe [:console-created? :cljs-console])
+        console-created? (subscribe [:console-created? :cljs-console])
         example-mode? (subscribe [:example-mode? :cljs-console])]
     (fn []
       [v-box

                :class "cljs-btn"
                :tooltip "Create Gist"
                :tooltip-position :below-center
                :disabled? (not @(subscribe [:console-created? :cljs-console]))]
     :popover  [gist-login-popover-dialog-body showing? auth-data ok-fn cancel-fn]]))

(defn cljs-buttons


(defn gist-login-popover-dialog
  []
  (let [console (subscribe [:get-console :cljs-console])
        console-created? (subscribe [:console-created? :cljs-console])
        showing? (reagent/atom false)
        auth-data (reagent/atom {:username "" :password ""})
        save-auth-data (reagent/atom nil)
        ok-fn #(do (reset! showing? false)
                   (let [{:keys [username password]} @auth-data
                         text (console/dump-console! @console)]
                     (gist/create-gist username password text on-gist-created gist-error-handler)))
        cancel-fn #(do
                     (reset! auth-data @save-auth-data)
