From a211c6323ee50a4b7015567a2e99b1e0519d3c53 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Mon, 28 Dec 2015 20:39:46 +0200
Subject: [PATCH] Add selected shapes state lense.

---
 frontend/uxbox/ui/workspace/base.cljs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/frontend/uxbox/ui/workspace/base.cljs b/frontend/uxbox/ui/workspace/base.cljs
index 1e99ed9fe..13b21e635 100644
--- a/frontend/uxbox/ui/workspace/base.cljs
+++ b/frontend/uxbox/ui/workspace/base.cljs
@@ -31,6 +31,10 @@
   (as-> (l/in [:workspace]) $
     (l/focus-atom $ s/state)))
 
+(def ^:static selected-state
+  (as-> (l/in [:workspace :selected]) $
+    (l/focus-atom $ s/state)))
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Scroll Stream
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;