          (datetime/as-duration (container-utilization-duration actions))
          ")"]))))
 
-(defn container-pill-v2 [{:keys [container current-container-id build-running?]} owner]
+(defn maybe-override-status [status {:keys [until] :as override-status}]
+  (if (and override-status
+           (>= until (datetime/now)))
+    (:status override-status)
+    status))
+
+(defn container-pill-v2 [{:keys [container status current-container-id build-running?]} owner]
   (reify
     om/IDisplayName
     (display-name [_] "Container Pill v2")

    om/IDidUpdate
    (did-update [_ _ _]
      (timer/set-updating! owner (not (last-action-end-time container))))
    om/IRender
    (render [_]
      (html
       (let [container-id (container-model/id container)
             status (container-model/status container build-running?)
             duration-ms (container-utilization-duration container)]
         [:a.container-selector-v2
          {:on-click #(raise! owner [:container-selected {:container-id container-id}])
           :class (concat (container-model/status->classes status)

          [:span.upper-pill-section
           [:span.container-index (str (:index container))]
           [:span.status-icon
            (om/build container-result-icon {:name icon-name})]]
          (om/build container-duration-label {:actions (:actions container)})])))))

(def paging-width 10)
