From 33fd84623f559cad7b93c5b672194702fa7eb212 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Tue, 29 Mar 2016 22:17:56 +0300
Subject: [PATCH] Restore workspace scroll with space.

---
 src/uxbox/ui/workspace.cljs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/uxbox/ui/workspace.cljs b/src/uxbox/ui/workspace.cljs
index 92d60ca308..bcd5b3bcae 100644
--- a/src/uxbox/ui/workspace.cljs
+++ b/src/uxbox/ui/workspace.cljs
@@ -45,7 +45,7 @@
   (letfn [(handle-scroll-interaction []
             (let [stoper (->> uuc/actions-s
                               (rx/map :type)
-                              (rx/filter #(not= % :scroll/viewport))
+                              (rx/filter #(empty? %))
                               (rx/take 1))
                   local (:rum/local own)
                   initial @uuwb/mouse-viewport-a]
@@ -70,7 +70,7 @@
         sub1 (as-> uuc/actions-s $
               (rx/map :type $)
               (rx/dedupe $)
-              (rx/filter #(= :scroll/viewport %) $)
+              (rx/filter #(= "ui.workspace.scroll" %) $)
               (rx/on-value $ handle-scroll-interaction))
         sub2 (udp/watch-page-changes pageid)]
     (set! (.-scrollLeft el) uuwb/canvas-start-scroll-x)