         (om/update! programmes :selected (:programmes active-components))))
     om/IRender
     (render [_]
-      (let [programmes (-> data :programmes)]
-        (html
-         [:div {:id "programmes-div"}
-          [:h1 "Programmes"]
-          (om/build programmes-table programmes)])))))
+      (html
+       [:div.row#programmes-div
+        [:div {:class "col-md-12"}
+         [:h1 "Programmes"]
+         (om/build programmes-table data)]]))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; projects

      (let [{:keys [programmes projects active-components]} data
            history (om/get-shared owner :history)]
        (html
         [:div {:id "projects-div"}
          [:div {:class (if (:programme-id projects) "" "hidden")}
           [:h2 "Projects"]
           [:ul {:class "breadcrumb"}
            [:li [:a

      (let [{:keys [programmes projects properties devices sensors active-components]} data
            history (om/get-shared owner :history)]
        (html
         [:div.row#sensors-div
          [:div {:class (str "col-md-12 "  (if (:device-id sensors) "" "hidden"))}
           [:h2 {:id "sensors"} "Sensors"]
           [:ul {:class "breadcrumb"}
            [:li [:a
