           names (map :name projects)]
       (is (= ["some-name"
               "either"
-              "some-other-name"]
+              "some-other-name"
+              "some-other-other-name"]
              names)))))


(defn some-name [& _])
(defn some-other-name [& _])

(def pipeline-def
  `(
     some-name
     (control-flow/either
       some-other-name)))

(def some-state {8 {[1] {:status                :success
                         :first-updated-at      (t/date-time 2015 1 2 3 40 1)
                         :most-recent-update-at (t/date-time 2015 1 2 3 40 0)}}
                 3 {[1 2] {:status                :running
                           :first-updated-at      (t/date-time 2015 1 2 3 40 1)
                           :most-recent-update-at (t/date-time 2015 1 2 3 40 1)}}
                 2 {[1 2] {:status                :failure
                           :first-updated-at      (t/date-time 2015 1 2 3 40 2)
                           :most-recent-update-at (t/date-time 2015 1 2 3 40 2)}}})


          names (map :name projects)]
      (is (= ["some-crazy-pipeline :: some-name"
              "some-crazy-pipeline :: either"
              "some-crazy-pipeline :: some-other-name"
              "some-crazy-pipeline :: some-other-other-name"
              ]
             names))))
  (testing "That it produces a valid cctray-xml for multiple pipelines"
    (let [xmlstring (cctray-xml-for [(mock-pipeline some-state {:name   "some-crazy-pipeline"
