                     "transform"
                     (fn [item i]
                       (gstring/format "translate(%s,%s)" 0  (- (+ square-size))))}))
-    (-> right-legend-item
+    (-> right-legend-enter
         (.append "text")
         (.attr #js {"x" (+ square-size
                            spacing)})
         (.text #(aget % "text")))))
 
 (defn visualize-insights-bar! [el builds]
-  (let [max-bar-count 60
-        builds (take max-bar-count builds)
-        y-max (apply max (mapcat #((juxt :queued_time_minutes :build_time_minutes) %)
+  (let [y-max (apply max (mapcat #((juxt :queued_time_minutes :build_time_minutes) %)
                                  builds))
-        plot-info {:width (- (:width svg-info) (:left svg-info) (:right svg-info))
-                   :height (- (:height svg-info) (:top svg-info) (:bottom svg-info))}
         y-scale (-> (js/d3.scale.linear)
                     (.domain #js[(- y-max) y-max])
                     (.range #js[(:height plot-info) 0])

       (filter build-graphable)
       reverse
       (map add-queued-time)
       (map add-minute-measures)))

(defn project-insights-bar [builds owner]
  (reify

                    "transform"
                    (fn [item i]
                      (gstring/format "translate(%s,%s)" 0  (- (+ square-size))))}))
    (-> left-legend-enter
        (.append "text")
        (.attr #js {"x" (+ square-size spacing)})
        (.text #(aget % "text")))

    ;; right legend
    (-> right-legend-enter
        (.append "rect")
        (.attr #js {"width" square-size
                    "height" square-size
