                                                    :build_num (:build_num @build)}]))}
                 "Queue"]])
 
+            (when show-ssh-info?
+              [:li {:class (when (= :ssh-info selected-tab) "active")}
+               [:a {:on-click #(raise! owner [:build-header-tab-clicked {:tab :ssh-info}])}
+                "SSH info"]])
+
             ;; tests don't get saved until the end of the build (TODO: stream the tests!)
             (when (build-model/finished? build)
               [:li {:class (when (= :tests selected-tab) "active")}

                  "Cancel"]))]]
            [:div.no-user-actions]]

           (when (and logged-in? (build-model/ssh-enabled-now? build))
             (om/build build-ssh (:node build)))

           (om/build build-sub-head data)]])))))


(defn build-ssh [nodes owner]
  (reify
    om/IRender
    (render [_]
      (html
       [:div.ssh-info-container
        [:div.build-ssh-title
         [:p "You can SSH into this build. Use the same SSH public key that you use for GitHub. SSH boxes will stay up for 30 minutes."]
         [:p "This build takes up one of your concurrent builds, so cancel it when you are done."]]
        [:div.build-ssh-list
         [:dl.dl-horizontal
          (map (fn [node i]
