       :title "Project settings"}
      [:i.material-icons "settings"]]]))
 
+(defn- legacy-branch-picker
+  "Wraps the branch picker in a legacy component which can load the project data
+  on mount."
+  [app owner]
+  (reify
+    om/IWillMount
+    (will-mount [_]
+      (let [projects-loaded? (seq (get-in app state/projects-path))
+            current-user (get-in app state/user-path)]
+        (when (and (not projects-loaded?)
+                   (not (empty? current-user)))
+          (api/get-projects (om/get-shared owner [:comms :api])))))
+
+    om/IRender
+    (render [_]
+      (om/build aside/branch-activity-list app))))
+
 (defui ^:once Page
   static om-next/IQuery
   (query [this]

(ns frontend.components.pages.workflow
  (:require [clojure.string :as string]
            [frontend.components.common :as common]
            [frontend.components.pieces.button :as button]
            [frontend.components.pieces.card :as card]

            [frontend.datetime :as datetime]
            [frontend.models.build :as build-model]
            [frontend.routes :as routes]
            [frontend.state :as state]
            [frontend.utils :refer-macros [component element html]]
            [frontend.utils.github :as gh-utils]
            [frontend.utils.legacy :refer [build-legacy]]
            [frontend.utils.vcs-url :as vcs-url]
            [om.core :as om]
            [om.next :as om-next :refer-macros [defui]]))

(defn- status-class [run-status]
