Respo Inflow Popup

Popup UI demo for Respo apps

Demo http://repo.respo-mvc.org/inflow-popup/

[respo/inflow-popup "0.2.8"]

It's like local dropdown menu component in React.js .

inflow-popup.comp.dialog/comp-dialog
inflow-popup.comp.dialog/comp-menu-dialog
inflow-popup.comp.dropdown/comp-dropdown

(if (:show? state)
 (comp-dialog
  (fn [mutate!] (mutate! %cursor (update state :show? not)))
  (div {} (<> "Inside"))))

(cursor-> :popup comp-popup states
  {:trigger (<> "Launch"),
   :style {:background-color (hsl 0 0 96), :padding "0 8px"}
   :on-popup (fn [e d! m!])}
  (fn [toggle!]
    (div {}
     (<> "Inside")
     (=< 8 nil)
     (button
      {:style ui/button,
       :inner-text "Close",
       :on-click (fn [e d! m!] (toggle! m!))})))))

(if (:show-menu? state)
     (comp-menu-dialog
      (fn [result d! m!]
        (println "result" result)
        (m! %cursor (update state :show-menu? not)))
      {:haskell "Haskell",
       :clojure "Clojure",
       :elixir (div
                {:style {}}
                (div {} (<> "Elixir"))
                (div {} (<> "...with an extra line")))})))

Develop

https://github.com/mvc-works/calcit-workflow

License

MIT