Skip to content

Instantly share code, notes, and snippets.

@lildata
Last active October 13, 2015 12:33
Show Gist options
  • Save lildata/34a55d55fe5775d61760 to your computer and use it in GitHub Desktop.
Save lildata/34a55d55fe5775d61760 to your computer and use it in GitHub Desktop.
(listen (select root [:#full]) :action (fn [e] (toggle-full-screen! root)))
(def static-popup
(popup :items ["HI" "BYE"]))
; simply def vs defn, beautiful !
(defn dynamic-popup
[event]
[(str "HI-" (rand)) "BYE"])
(scrollable
(table-x :model [:columns [:name :file :line]
:rows (map (comp meta val) (ns-publics 'seesaw.core))]
:horizontal-scroll-enabled? true))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment