From 5e6b3e94da500d91b9fc62c53eb202921a4df2e2 Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Sat, 25 Jun 2016 17:01:42 +0300 Subject: [PATCH] Cosmetic improvements on sitemap sidebar ns. --- src/uxbox/main/ui/workspace/sidebar/sitemap.cljs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/uxbox/main/ui/workspace/sidebar/sitemap.cljs b/src/uxbox/main/ui/workspace/sidebar/sitemap.cljs index 85d1d1091..989ec454d 100644 --- a/src/uxbox/main/ui/workspace/sidebar/sitemap.cljs +++ b/src/uxbox/main/ui/workspace/sidebar/sitemap.cljs @@ -30,12 +30,12 @@ ;; --- Lenses -(def ^:const pages-l +(def pages-l (letfn [(getter [state] (let [project (get-in state [:workspace :project])] (stpr/project-pages state project)))] - (as-> (l/lens getter) $ - (l/derive $ st/state)))) + (-> (l/lens getter) + (l/derive st/state)))) ;; --- Component