Inherited methods:
from alignment<%>
align
get-min-height
get-min-width
get-parent
set-min-sizes
show
show/ hide
stretchable-height
stretchable-width
from dllist<%>
for-each
map-to-list
next
prev

embedded-text-button% : class?

  superclass: snip-wrapper%

  extends: alignment<%>
A button with a text label.

(new embedded-text-button% [label label] 
  [callback callback]) 
  (is-a?/c embedded-text-button%)
  label : string?
  callback : ((is-a?/c text-button-snip%) (is-a?/c event%) . -> . void?)
The callback is called when the button is clicked.