mirror of
https://github.com/penpot/penpot.git
synced 2025-08-03 08:40:20 +02:00
Add interaction to new sitemap markup.
This commit is contained in:
parent
6f23272c63
commit
a2af628a14
2 changed files with 167 additions and 51 deletions
|
@ -2,26 +2,59 @@
|
|||
(:require [sablono.core :as html :refer-macros [html]]
|
||||
[rum.core :as rum]
|
||||
[cats.labs.lens :as l]
|
||||
[cuerdas.core :as str]
|
||||
[uxbox.locales :refer (tr)]
|
||||
[uxbox.router :as r]
|
||||
[uxbox.rstore :as rs]
|
||||
[uxbox.state :as st]
|
||||
[uxbox.shapes :as shapes]
|
||||
[uxbox.library :as library]
|
||||
[uxbox.util.data :refer (read-string)]
|
||||
[uxbox.data.projects :as dp]
|
||||
[uxbox.data.workspace :as dw]
|
||||
[uxbox.ui.dashboard.projects :refer (+layouts+)]
|
||||
[uxbox.ui.workspace.base :as wb]
|
||||
[uxbox.ui.icons :as i]
|
||||
[uxbox.ui.mixins :as mx]
|
||||
[uxbox.ui.lightbox :as lightbox]
|
||||
[uxbox.util.data :refer (read-string parse-int)]
|
||||
[uxbox.util.dom :as dom]))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; Component
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
(defn page-item-render
|
||||
[own page total active?]
|
||||
(let [deletable? (> total 1)
|
||||
navigate #(rs/emit! (dp/go-to (:project page) (:id page)))
|
||||
edit #(lightbox/open! :page-form {:page page})
|
||||
delete (fn [e]
|
||||
(dom/prevent-default e)
|
||||
(dom/stop-propagation e)
|
||||
(rs/emit! (dp/delete-page (:id page))
|
||||
(dp/go-to (:project page))))]
|
||||
(html
|
||||
[:li {:class (when active? "selected")
|
||||
:on-click navigate}
|
||||
[:div.page-icon i/page]
|
||||
[:span (:name page)]
|
||||
[:div.page-actions
|
||||
[:a {:on-click edit} i/pencil]
|
||||
(if deletable?
|
||||
[:a {:on-click delete} i/trash])]])))
|
||||
|
||||
(def ^:const page-item
|
||||
(mx/component
|
||||
{:render page-item-render
|
||||
:name "page-item"
|
||||
:mixins [(mx/local) mx/static rum/reactive]}))
|
||||
|
||||
(defn sitemap-toolbox-render
|
||||
[open-toolboxes]
|
||||
(let [workspace (rum/react wb/workspace-l)
|
||||
[own]
|
||||
(let [project (rum/react wb/project-l)
|
||||
pages (rum/react wb/pages-l)
|
||||
current (rum/react wb/page-l)
|
||||
create #(lightbox/open! :page-form {:page {:project (:id project)}})
|
||||
close #(rs/emit! (dw/toggle-flag :sitemap))]
|
||||
(html
|
||||
[:div.sitemap.tool-window
|
||||
|
@ -31,20 +64,120 @@
|
|||
[:div.tool-window-close {:on-click close} i/close]]
|
||||
[:div.tool-window-content
|
||||
[:div.project-title
|
||||
[:span "Project name"]
|
||||
[:div.add-page i/close]]
|
||||
[:span (:name project)]
|
||||
[:div.add-page {:on-click create} i/close]]
|
||||
[:ul.element-list
|
||||
(for [i (range 10)]
|
||||
[:li {:key i :class (when (= i 2) "selected")}
|
||||
[:div.page-icon i/page]
|
||||
[:span (str "Page " i)]
|
||||
[:div.page-actions
|
||||
[:a i/pencil]
|
||||
[:a i/trash]]])
|
||||
]]])))
|
||||
(for [page pages
|
||||
:let [active? (= (:id page) (:id current))]]
|
||||
(-> (page-item page (count pages) active?)
|
||||
(rum/with-key (:id page))))]]])))
|
||||
|
||||
(def ^:static sitemap-toolbox
|
||||
(mx/component
|
||||
{:render sitemap-toolbox-render
|
||||
:name "sitemap-toolbox"
|
||||
:mixins [mx/static rum/reactive]}))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; Lightbox
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
(def ^:const +page-defaults+
|
||||
{:width 1920
|
||||
:height 1080
|
||||
:layout :desktop})
|
||||
|
||||
(defn- layout-input
|
||||
[local page id]
|
||||
(let [layout (get +layouts+ id)
|
||||
size (select-keys layout [:width :height])
|
||||
change #(swap! local merge {:layout id} size)]
|
||||
(html
|
||||
[:div
|
||||
[:input {:type "radio"
|
||||
:key id :id id
|
||||
:name "project-layout"
|
||||
:value (:id layout)
|
||||
:checked (= id (:layout page))
|
||||
:on-change change}]
|
||||
[:label {:value (:id layout) :for id} (:name layout)]])))
|
||||
|
||||
(defn- page-form-lightbox-render
|
||||
[own local page]
|
||||
(let [edition? (:id page)
|
||||
page (merge page @local)
|
||||
;; {:keys [name width height] :or {name ""} :as page} (merge page @local)
|
||||
valid? (and (not (str/empty? (str/trim (:name page ""))))
|
||||
(pos? (:width page))
|
||||
(pos? (:height page)))]
|
||||
(letfn [(update-size [field e]
|
||||
(let [value (dom/event->value e)
|
||||
value (parse-int value)]
|
||||
(swap! local assoc field value)))
|
||||
(update-name [e]
|
||||
(let [value (dom/event->value e)]
|
||||
(swap! local assoc :name value)))
|
||||
(toggle-sizes []
|
||||
(swap! local assoc
|
||||
:width (:height page)
|
||||
:height (:width page)))
|
||||
(cancel [e]
|
||||
(dom/prevent-default e)
|
||||
(lightbox/close!))
|
||||
(persist [e]
|
||||
(dom/prevent-default e)
|
||||
(lightbox/close!)
|
||||
(if edition?
|
||||
(rs/emit! (dp/update-page page))
|
||||
(rs/emit! (dp/create-page page))))]
|
||||
(html
|
||||
[:div.lightbox-body
|
||||
(if edition?
|
||||
[:h3 "Edit page"]
|
||||
[:h3 "New page"])
|
||||
[:form
|
||||
[:input#project-name.input-text
|
||||
{:placeholder "Page name"
|
||||
:type "text"
|
||||
:value (:name page "")
|
||||
:auto-focus true
|
||||
:on-change update-name}]
|
||||
[:div.project-size
|
||||
[:input#project-witdh.input-text
|
||||
{:placeholder "Width"
|
||||
:type "number"
|
||||
:min 0
|
||||
:max 4000
|
||||
:value (:width page)
|
||||
:on-change #(update-size :width %)}]
|
||||
[:a.toggle-layout {:on-click toggle-sizes} i/toggle]
|
||||
[:input#project-height.input-text
|
||||
{:placeholder "Height"
|
||||
:type "number"
|
||||
:min 0
|
||||
:max 4000
|
||||
:value (:height page)
|
||||
:on-change #(update-size :height %)}]]
|
||||
|
||||
[:div.input-radio.radio-primary
|
||||
(layout-input local page :mobile)
|
||||
(layout-input local page :tablet)
|
||||
(layout-input local page :notebook)
|
||||
(layout-input local page :desktop)]
|
||||
|
||||
(when valid?
|
||||
[:input#project-btn.btn-primary
|
||||
{:value "Go go go!"
|
||||
:on-click persist
|
||||
:type "button"}])]
|
||||
[:a.close {:on-click cancel} i/close]]))))
|
||||
|
||||
(def page-form-lightbox
|
||||
(mx/component
|
||||
{:render #(page-form-lightbox-render %1 (:rum/local %1) %2)
|
||||
:name "page-form-lightbox"
|
||||
:mixins [(mx/local)]}))
|
||||
|
||||
(defmethod lightbox/render-lightbox :page-form
|
||||
[{:keys [page]}]
|
||||
(page-form-lightbox page))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue