class Shoes
  module Swt
    class Button < SwtButton
      include Common::Child

      # Create a button
      #
      # @param [Shoes::Button] dsl The Shoes DSL button this represents
      # @param [::Swt::Widgets::Composite] parent The parent element of this button
      # @param [Proc] blk The block of code to call when this button is activated
      def initialize(dsl, parent)
        super(dsl, parent, ::Swt::SWT::PUSH) do |button|
          button.set_text @dsl.text
        end
      end
    end
  end
end