diff --git a/src/uxbox/data/projects.cljs b/src/uxbox/data/projects.cljs
index 94bde79db..39a56afdf 100644
--- a/src/uxbox/data/projects.cljs
+++ b/src/uxbox/data/projects.cljs
@@ -27,15 +27,18 @@
   [projects]
   (ProjectsFetched. projects))
 
+(defn projects-fetched?
+  [v]
+  (instance? ProjectsFetched v))
+
 ;; --- Fetch Projects
 
 (defrecord FetchProjects []
   rs/WatchEvent
   (-apply-watch [_ state s]
-    (letfn [(on-loaded [{projects :payload}]
-              #(reduce stpr/assoc-project % projects))]
-      (->> (rp/req :fetch/projects)
-           (rx/map on-loaded)))))
+    (->> (rp/req :fetch/projects)
+         (rx/map :payload)
+         (rx/map projects-fetched))))
 
 (defn fetch-projects
   []