Skip to content

Instantly share code, notes, and snippets.

@daveray
Created May 31, 2011 15:47
Show Gist options
  • Save daveray/1000729 to your computer and use it in GitHub Desktop.
Save daveray/1000729 to your computer and use it in GitHub Desktop.
seesaw setvisible
(frame :resizable? true
:content (vertical-panel
:id :panel
:items
[(button :text "show button 2"
:listen [:action (fn [e]
(let [btn (select (to-frame e) [:#btn])]
(.setVisible btn true)))])
(doto (button :id :btn :text "here I am") (.setVisible false))]))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment