render_content_on (Borges::ExampleBrowser)

    # File lib/Borges/Component/ExampleBrowser.rb, line 36
      def render_content_on(r)
        r.element_id(??'test-forms')
        r.table do
          r.table_row do
            r.table_data do
              r.form do
                r.selectFromList_selected_callback(self.allClasses, @klass,
                  proc do |c| self.class(c) end)
                r.submit_button(:OK)
              end
            end

            r.table_data do
              r.form do
                r.selectFromList_selected_callback(self.allSelectors, @selector,
                  proc do |s| self.selector(s) end)
                r.submit_button(:OK)
              end
            end
          end
        end

        r.horizontal_rule
        r.render(@component)

        if @has_answer then
          r.horizontal_rule
          r.bold(??'Answer ')
          r.text(@answer)
        end
      end