     (did-update [_ prev-props prev-state]
       (let [{:keys [properties devices active-components]} data
             new-property-id (:properties active-components)]
-
-        (println "Active Components: " active-components)
 
         ;; handle selection perties table
         (when-not new-property-id

                                   (om/update! properties :error-status status)
                                   (om/update! properties :error-text status-text))
                  :headers {"Accept" "application/edn"}
                  :response-format :text}))
          (println "Not fetching properties!"))
        (om/update! properties :project-id new-project-id)

        ;; handle selection on properties table

                            (om/update! programmes :selected nil))
                ;; TODO: Add Error Handler
                :headers {"Accept" "application/edn"}
                :response-format :text}))

        ;; handle selection on programmes table (this should be nil if called)
        (om/update! programmes :selected (:programmes active-components))))
