From 4c97c26f6decab7fd26b05a9ae2275ab0f2cca4e Mon Sep 17 00:00:00 2001
From: "mathieu.brunot" <mb.mathieu.brunot@gmail.com>
Date: Sat, 23 Feb 2019 11:17:35 +0100
Subject: [PATCH] :bug: Add missing viewer lightbox data

---
 frontend/src/uxbox/view/data/lightbox.cljs | 46 ++++++++++++++++++++++
 1 file changed, 46 insertions(+)
 create mode 100644 frontend/src/uxbox/view/data/lightbox.cljs

diff --git a/frontend/src/uxbox/view/data/lightbox.cljs b/frontend/src/uxbox/view/data/lightbox.cljs
new file mode 100644
index 000000000..5288cc9ee
--- /dev/null
+++ b/frontend/src/uxbox/view/data/lightbox.cljs
@@ -0,0 +1,46 @@
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) 2016 Andrey Antukh <niwi@niwi.nz>
+
+(ns uxbox.view.data.lightbox
+  (:require [beicon.core :as rx]
+            [lentes.core :as l]
+            [potok.core :as ptk]
+            [uxbox.view.store :as st]))
+
+;; --- Show Lightbox
+
+(defrecord ShowLightbox [name params]
+  ptk/UpdateEvent
+  (update [_ state]
+    (let [data (merge {:name name} params)]
+      (assoc state :lightbox data))))
+
+(defn show-lightbox
+  ([name]
+   (ShowLightbox. name nil))
+  ([name params]
+   (ShowLightbox. name params)))
+
+;; --- Hide Lightbox
+
+(defrecord HideLightbox []
+  ptk/UpdateEvent
+  (update [_ state]
+    (dissoc state :lightbox)))
+
+(defn hide-lightbox
+  []
+  (HideLightbox.))
+
+;; --- Direct Call Api
+
+(defn open!
+  [& args]
+  (st/emit! (apply show-lightbox args)))
+
+(defn close!
+  [& args]
+  (st/emit! (apply hide-lightbox args)))