module Symbiont
  module WebObjects

    class CheckBox < WebObject
      
      def check
        @web_object.set
      end
      
      def uncheck
        @web_object.clear
      end
      
      def checked?
        @web_object.set?
      end
      
    end # class: CheckBox
    
    ::Symbiont::WebObjects.class_for_type[:checkbox] = ::Symbiont::WebObjects::CheckBox
    
  end # module: WebObjects
end # module: Symbiont