       (fn [index segment]
         (if (zero? index)
           {:text "Workspaces" :href "#workspaces"}
-          {:text (replace (js/decodeURIComponent segment) ":" "/")
+          {:text (clojure.string/replace (js/decodeURIComponent segment) ":" "/")
            :href (str "#" (join "/" (subvec segments 0 (inc index))))}))
       segments)))
 


(def row-height-px 56)


(react/defc StatusCell
  {:render
   (fn [{:keys [props]}]
     (let [status (get-in props [:data :status])]
       [:a {:href (nav/create-href (:nav-context props) (get-in props [:data :href]))
            :style {:display "block" :backgroundColor (style/color-for-status status)
                    :margin "2px 0 0 2px" :height (- row-height-px 4)
                    :position "relative"}}
        [:span {:style {:display "block" :backgroundColor "rgba(0,0,0,0.2)"
                        :position "absolute" :top 0 :right 0 :bottom 0 :left 0}}]
        (style/center {}

  {:render
   (fn [{:keys [props]}]
     (let [{:keys [nav-context data]} props
           {:keys [href status protected? disabled?]} data
           color (style/color-for-status status)]
       [:a {:href (if disabled?
                    "javascript:;"
                    (nav/create-href nav-context href))
            :style {:display "block"
                    :backgroundColor color
                    :color "white" :textDecoration "none"
                    :cursor (when disabled? "default")
                    :WebkitFilter (when disabled? "grayscale()")
                    :height (- row-height-px 4)}
            :title (when disabled? disabled-text)}
        (when protected?
          [:span {:style {:display "block" :position "relative"}}
           [:span {:style {:display "block" :position "absolute" :left -16 :top 17
