capybara_minitest_spec 0.2.2 → 1.0.0

data/.rvmrc

@@ -1 +1 @@
-rvm use --create ruby-1.9.2-p0@capybara_minispec
+rvm use --create ruby-1.9.3-p327@capybara_minispec

data/README.md

@@ -1,56 +1,55 @@
-# Capybara MiniTest Spec [![Build Status](https://secure.travis-ci.org/ordinaryzelig/capybara_minitest_spec.png?branch=master)](http://travis-ci.org/ordinaryzelig/capybara_minitest_spec)
+CapybaraMiniTestSpec
+====================
 
-Define MiniTest::Spec expectations for Capybara node matchers.
+[![Build Status](https://secure.travis-ci.org/ordinaryzelig/capybara_minitest_spec.png?branch=master)](http://travis-ci.org/ordinaryzelig/capybara_minitest_spec)
 
 ## Description
 
-If you like using Capybara and RSpec, you're used to matchers like:
+If you've used [Capybara](https://github.com/jnicklas/capybara) and RSpec, you've probably used matchers like:
 
-    page.should have_content('Title')
+```ruby
+page.should have_content('Title')
+```
 
-Now you can have similar functionality while using MiniTest::Spec:
+With CapybaraMiniTestSpec you can have similar functionality while using MiniTest::Spec:
 
-    page.must_have_content('Title')
+```ruby
+page.must_have_content('Title')
+```
 
-## Install
+You can also use the TestUnit style assertions:
 
-    gem install capybara_minitest_spec
+```ruby
+assert_page_has_content page, 'Title'
+```
 
-## Usage
+But if you really want to be simple with MiniTest::Unit, you don't need this gem.
+You can do the following without this gem:
 
-The gem iterates through all of Capybara::Node's matcher methods and defines these things for each one:
+```ruby
+assert page.has_content?('Title'), 'Your custom failure message'
+```
 
-* positive assertion:   assert_page_has_css(page, 'h1')
-* positive expectation: page.must_have_css('h1')
-* negative assertion:   refute_page_has_css(page, 'h1')
-* negative expectation: page.wont_have_css('h1')
+However, if you choose to use this gem, you get Capybara's failure messages as if you were using RSpec matchers.
 
-### Custom Expectations
+```ruby
+assert_page_has_content?('<h1>Content</h1>', 'No such Text')
+# fails with 'expected there to be text "No such Text" in "Content"'
+```
 
-If you want to add your own custom page expectations, it's easy.
+## Install
 
 ```ruby
-# First define a Capybara session method so that
-# page.has_flash_message?(message) is available.
-class Capybara::Session
-  def has_flash_message?(message)
-    within '#flash' do
-      has_content? message
-    end
-  end
-end
-# Then create a new CapybaraMiniTestSpec::Matcher.
-CapybaraMiniTestSpec::Matcher.new(:has_flash_message?)
+# Gemfile
+gem 'capybara_minitest_spec'
 ```
 
-Now you can do `page.must_have_flash_message('Successfully created')`
+NOTE: If after installing the Capybara gem, Nokogiri isn't installed, it's a known bug (https://github.com/jnicklas/capybara/issues/882).
 
 ## Compatibility
 
-In theory, this should work with any version of Capybara, so the runtime dependency is not version specific. At the time of this writing, it was tested with Capybara 1.1.1.
-
+In theory, this should work with Capybara >= 2. At the time of this writing, it was tested with Capybara 2.0.1.
 
 ## Testing
 
-This gem was tested by basically copying the Capybara spec located in 'spec/rspec/matchers_spec.rb' and altering the test to run with MiniTest.
-Capybara uses xpath as a submodule of the git repository. I used the regular gem.
+This gem was tested by basically copying the Capybara spec located in 'spec/rspec/matchers_spec.rb' and [altering the test to run with MiniTest](https://gist.github.com/4297afa19edd44885248).

data/Rakefile

@@ -2,8 +2,8 @@ require "bundler/gem_tasks"
 require 'rake/testtask'
 
 Rake::TestTask.new(:test) do |t|
-  t.libs << 'test'
-  t.pattern = 'test/*_spec.rb'
+  t.libs << 'spec'
+  t.pattern = 'spec/*.spec.rb'
 end
 
 task :default => :test

data/capybara_minitest_spec.gemspec

@@ -8,8 +8,8 @@ Gem::Specification.new do |s|
   s.authors     = ["Jared Ning"]
   s.email       = ["jared@redningja.com"]
   s.homepage    = "https://github.com/ordinaryzelig/capybara_minitest_spec"
-  s.summary     = %q{MiniTest::Spec expectations for Capybara node matchers.}
-  s.description = %q{MiniTest::Spec expectations for Capybara node matchers.}
+  s.summary     = %q{Capybara + MiniTest::Spec}
+  s.description = %q{Use Capybara matchers with MiniTest. Specifically, it defines MiniTest::Spec expectations like page.must_have_content('content').}
 
   s.rubyforge_project = "capybara_minitest_spec"
 
@@ -18,8 +18,10 @@ Gem::Specification.new do |s|
   s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
   s.require_paths = ["lib"]
 
-  s.add_runtime_dependency 'capybara'
-  s.add_runtime_dependency 'minitest', '>= 2.0'
+  s.add_runtime_dependency 'capybara', '>= 2'
+  s.add_runtime_dependency 'minitest', '>= 2'
 
+  s.add_development_dependency 'awesome_print'
+  s.add_development_dependency 'rake'
   s.add_development_dependency 'sinatra', '>= 0.9.4'
 end

data/lib/capybara_minitest_spec.rb

@@ -1,11 +1,58 @@
+require "capybara_minitest_spec/version"
+
 require 'minitest/spec'
 require 'capybara'
-require "capybara_minitest_spec/matcher"
-require "capybara_minitest_spec/version"
+require 'capybara/rspec/matchers'
+require "capybara_minitest_spec/test_name"
+
+module CapybaraMiniTestSpec
+
+  module_function
+
+  # Define assertions and spec expectations for both positive and negative forms of the matcher name.
+  def add_matcher(matcher_name)
+    positive_name = CapybaraMiniTestSpec::PositiveTestName.new(matcher_name)
+    negative_name = CapybaraMiniTestSpec::NegativeTestName.new(matcher_name)
+    [positive_name, negative_name].each do |test_name|
+      CapybaraMiniTestSpec.define_expectation(test_name)
+    end
+  end
+
+  def define_expectation(test_name)
+    define_assertion(test_name)
+    infect_assertion(test_name)
+  end
+
+  # Define an assertion using test_name.
+  # For example, if the test name is have_css,
+  # the assertion would be called assert_page_has_css.
+  #
+  # Use either of Capybara::RSpecMatchers.
+  # Assert that it matches, and pass its failure message if it doesn't.
+  def define_assertion(test_name)
+    method_name = test_name.assertion_name
+    MiniTest::Assertions.send :define_method, method_name do |page, *args|
+      matcher = test_name.matcher(*args)
+
+      matches = matcher.send(test_name.match_method, page)
+      failure_message = message do
+        matcher.send(test_name.failure_message_method)
+      end
+
+      assert matches, failure_message
+    end
+  end
+
+  # Define the MiniTest::Spec expectation.
+  def infect_assertion(test_name)
+    MiniTest::Expectations.infect_an_assertion test_name.assertion_name, test_name.expectation_name, true
+  end
+
+end
 
-# For each Capybara node matcher,
+# For each Capybara RSpec matcher name,
 # define positive and negative MiniTest::Unit assertions and
-# infect it both assertions to create MiniTest::Spec expectations.
-Capybara::Node::Matchers.public_instance_methods.each do |matcher_name|
-  CapybaraMiniTestSpec::Matcher.new(matcher_name)
+# infect both assertions to create MiniTest::Spec expectations.
+Capybara::RSpecMatchers.public_instance_methods.each do |matcher_name|
+  CapybaraMiniTestSpec.add_matcher(matcher_name)
 end

data/lib/capybara_minitest_spec/test_name.rb

@@ -0,0 +1,67 @@
+module CapybaraMiniTestSpec
+  # Represents the a matcher name.
+  # Returns different forms of the name depending on whether it is positive or negative.
+  class TestName
+
+    include Capybara::RSpecMatchers
+
+    def initialize(name)
+      @original_name = name.to_s
+    end
+
+    def matcher(*args)
+      send @original_name, *args
+    end
+
+  private
+
+    def has
+      have.sub /^have/, 'has'
+    end
+
+    def have
+      @original_name
+    end
+
+  end
+
+  class PositiveTestName < TestName
+
+    def assertion_name
+      "assert_page_#{has}"
+    end
+
+    def expectation_name
+      "must_#{have}"
+    end
+
+    def match_method
+      :matches?
+    end
+
+    def failure_message_method
+      :failure_message_for_should
+    end
+
+  end
+
+  class NegativeTestName < TestName
+
+    def assertion_name
+      "refute_page_#{has}"
+    end
+
+    def expectation_name
+      "wont_#{have}"
+    end
+
+    def failure_message_method
+      :failure_message_for_should_not
+    end
+
+    def match_method
+      :does_not_match?
+    end
+
+  end
+end

data/lib/capybara_minitest_spec/version.rb

@@ -1,3 +1,3 @@
 module CapybaraMiniTestSpec
-  VERSION = '0.2.2'
+  VERSION = '1.0.0'
 end

data/spec/capybara_minitest_spec.spec.rb

@@ -0,0 +1,13 @@
+require_relative 'helper'
+
+describe CapybaraMiniTestSpec do
+
+  it 'defines the assertion' do
+    MiniTest::Assertions.public_instance_methods.must_include :assert_page_has_css
+  end
+
+  it 'defines the spec expectation' do
+    MiniTest::Expectations.public_instance_methods.must_include :must_have_css
+  end
+
+end

data/spec/capybara_rspec_matchers.spec.rb

@@ -0,0 +1,580 @@
+require_relative 'helper'
+
+# Setup Rack test app.
+require_relative 'test_app/test_app'
+Capybara.app = TestApp
+
+
+describe CapybaraMiniTestSpec do
+  include Capybara::DSL
+  include Capybara::RSpecMatchers
+
+  describe "have_css matcher" do
+    it "gives proper description" do
+      have_css('h1').description.must_equal "have css \"h1\""
+    end
+
+    context "on a string" do
+      context "with should" do
+        it "passes if has_css? returns true" do
+          "<h1>Text</h1>".must_have_css('h1')
+        end
+
+        it "fails if has_css? returns false" do
+          expect do
+            "<h1>Text</h1>".must_have_css('h2')
+          end.must_raise_with_message(/expected to find css "h2" but there were no matches/)
+        end
+
+        it "passes if matched node count equals expected count" do
+          "<h1>Text</h1>".must_have_css('h1', :count => 1)
+        end
+
+        it "fails if matched node count does not equal expected count" do
+          expect do
+            "<h1>Text</h1>".must_have_css('h1', :count => 2)
+          end.must_raise_with_message(/expected css "h1" to be found 2 times/)
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_css? returns true" do
+          "<h1>Text</h1>".wont_have_css('h2')
+        end
+
+        it "fails if has_no_css? returns false" do
+          expect do
+            "<h1>Text</h1>".wont_have_css('h1')
+          end.must_raise_with_message(/expected not to find css "h1"/)
+        end
+
+        it "passes if matched node count does not equal expected count" do
+          "<h1>Text</h1>".wont_have_css('h1', :count => 2)
+        end
+
+        it "fails if matched node count equals expected count" do
+          expect do
+            "<h1>Text</h1>".wont_have_css('h1', :count => 1)
+          end.must_raise_with_message(/expected not to find css "h1"/)
+        end
+      end
+    end
+
+    context "on a page or node" do
+      before do
+        visit('/with_html')
+      end
+
+      context "with should" do
+        it "passes if has_css? returns true" do
+          page.must_have_css('h1')
+        end
+
+        it "fails if has_css? returns false" do
+          expect do
+            page.must_have_css('h1#doesnotexist')
+          end.must_raise_with_message(/expected to find css "h1#doesnotexist" but there were no matches/)
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_css? returns true" do
+          page.wont_have_css('h1#doesnotexist')
+        end
+
+        it "fails if has_no_css? returns false" do
+          expect do
+            page.wont_have_css('h1')
+          end.must_raise_with_message(/expected not to find css "h1"/)
+        end
+      end
+    end
+  end
+
+  describe "have_xpath matcher" do
+    it "gives proper description" do
+      have_xpath('//h1').description.must_equal "have xpath \"\/\/h1\""
+    end
+
+    context "on a string" do
+      context "with should" do
+        it "passes if has_xpath? returns true" do
+          "<h1>Text</h1>".must_have_xpath('//h1')
+        end
+
+        it "fails if has_xpath? returns false" do
+          expect do
+            "<h1>Text</h1>".must_have_xpath('//h2')
+          end.must_raise_with_message(%r(expected to find xpath "//h2" but there were no matches))
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_xpath? returns true" do
+          "<h1>Text</h1>".wont_have_xpath('//h2')
+        end
+
+        it "fails if has_no_xpath? returns false" do
+          expect do
+            "<h1>Text</h1>".wont_have_xpath('//h1')
+          end.must_raise_with_message(%r(expected not to find xpath "//h1"))
+        end
+      end
+    end
+
+    context "on a page or node" do
+      before do
+        visit('/with_html')
+      end
+
+      context "with should" do
+        it "passes if has_xpath? returns true" do
+          page.must_have_xpath('//h1')
+        end
+
+        it "fails if has_xpath? returns false" do
+          expect do
+            page.must_have_xpath("//h1[@id='doesnotexist']")
+          end.must_raise_with_message(%r(expected to find xpath "//h1\[@id='doesnotexist'\]" but there were no matches))
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_xpath? returns true" do
+          page.wont_have_xpath('//h1[@id="doesnotexist"]')
+        end
+
+        it "fails if has_no_xpath? returns false" do
+          expect do
+            page.wont_have_xpath('//h1')
+          end.must_raise_with_message(%r(expected not to find xpath "//h1"))
+        end
+      end
+    end
+  end
+
+  describe "have_selector matcher" do
+    it "gives proper description" do
+      matcher = have_selector('//h1')
+      "<h1>Text</h1>".must_have_selector('//h1')
+      matcher.description.must_equal "have xpath \"//h1\""
+    end
+
+    context "on a string" do
+      context "with should" do
+        it "passes if has_selector? returns true" do
+          "<h1>Text</h1>".must_have_selector('//h1')
+        end
+
+        it "fails if has_selector? returns false" do
+          expect do
+            "<h1>Text</h1>".must_have_selector('//h2')
+          end.must_raise_with_message(%r(expected to find xpath "//h2" but there were no matches))
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_selector? returns true" do
+          "<h1>Text</h1>".wont_have_selector(:css, 'h2')
+        end
+
+        it "fails if has_no_selector? returns false" do
+          expect do
+            "<h1>Text</h1>".wont_have_selector(:css, 'h1')
+          end.must_raise_with_message(%r(expected not to find css "h1"))
+        end
+      end
+    end
+
+    context "on a page or node" do
+      before do
+        visit('/with_html')
+      end
+
+      context "with should" do
+        it "passes if has_selector? returns true" do
+          page.must_have_selector('//h1', :text => 'test')
+        end
+
+        it "fails if has_selector? returns false" do
+          expect do
+            page.must_have_selector("//h1[@id='doesnotexist']")
+          end.must_raise_with_message(%r(expected to find xpath "//h1\[@id='doesnotexist'\]" but there were no matches))
+        end
+
+        it "includes text in error message" do
+          expect do
+            page.must_have_selector("//h1", :text => 'wrong text')
+          end.must_raise_with_message(%r(expected to find xpath "//h1" with text "wrong text" but there were no matches))
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_css? returns true" do
+          page.wont_have_selector(:css, 'h1#doesnotexist')
+        end
+
+        it "fails if has_no_selector? returns false" do
+          expect do
+            page.wont_have_selector(:css, 'h1', :text => 'test')
+          end.must_raise_with_message(%r(expected not to find css "h1" with text "test"))
+        end
+      end
+    end
+  end
+
+  describe "have_content matcher" do
+    it "gives proper description" do
+      have_content('Text').description.must_equal "have text \"Text\""
+    end
+
+    context "on a string" do
+      context "with should" do
+        it "passes if has_content? returns true" do
+          "<h1>Text</h1>".must_have_content('Text')
+        end
+
+        it "passes if has_content? returns true using regexp" do
+          "<h1>Text</h1>".must_have_content(/ext/)
+        end
+
+        it "fails if has_content? returns false" do
+          expect do
+            "<h1>Text</h1>".must_have_content('No such Text')
+          end.must_raise_with_message(/expected there to be text "No such Text" in "Text"/)
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_content? returns true" do
+          "<h1>Text</h1>".wont_have_content('No such Text')
+        end
+
+        it "passes because escapes any characters that would have special meaning in a regexp" do
+          "<h1>Text</h1>".wont_have_content('.')
+        end
+
+        it "fails if has_no_content? returns false" do
+          expect do
+            "<h1>Text</h1>".wont_have_content('Text')
+          end.must_raise_with_message(/expected there not to be text "Text" in "Text"/)
+        end
+      end
+    end
+
+    context "on a page or node" do
+      before do
+        visit('/with_html')
+      end
+
+      context "with should" do
+        it "passes if has_content? returns true" do
+          page.must_have_content('This is a test')
+        end
+
+        it "passes if has_content? returns true using regexp" do
+          page.must_have_content(/test/)
+        end
+
+        it "fails if has_content? returns false" do
+          expect do
+            page.must_have_content('No such Text')
+          end.must_raise_with_message(/expected there to be text "No such Text" in "(.*)This is a test(.*)"/)
+        end
+
+        context "with default selector CSS" do
+          before { Capybara.default_selector = :css }
+          it "fails if has_content? returns false" do
+            expect do
+              page.must_have_content('No such Text')
+            end.must_raise_with_message(/expected there to be text "No such Text" in "(.*)This is a test(.*)"/)
+          end
+          after { Capybara.default_selector = :xpath }
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_content? returns true" do
+          page.wont_have_content('No such Text')
+        end
+
+        it "fails if has_no_content? returns false" do
+          expect do
+            page.wont_have_content('This is a test')
+          end.must_raise_with_message(/expected there not to be text "This is a test"/)
+        end
+      end
+    end
+  end
+
+  describe "have_text matcher" do
+    it "gives proper description" do
+      have_text('Text').description.must_equal "have text \"Text\""
+    end
+
+    context "on a string" do
+      context "with should" do
+        it "passes if has_text? returns true" do
+          "<h1>Text</h1>".must_have_text('Text')
+        end
+
+        it "passes if has_text? returns true using regexp" do
+          "<h1>Text</h1>".must_have_text(/ext/)
+        end
+
+        it "fails if has_text? returns false" do
+          expect do
+            "<h1>Text</h1>".must_have_text('No such Text')
+          end.must_raise_with_message(/expected there to be text "No such Text" in "Text"/)
+        end
+
+        it "casts has_text? argument to string" do
+          expect do
+            "<h1>Text</h1>".must_have_text(:cast_me)
+          end.must_raise_with_message(/expected there to be text "cast_me" in "Text"/)
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_text? returns true" do
+          "<h1>Text</h1>".wont_have_text('No such Text')
+        end
+
+        it "passes because escapes any characters that would have special meaning in a regexp" do
+          "<h1>Text</h1>".wont_have_text('.')
+        end
+
+        it "fails if has_no_text? returns false" do
+          expect do
+            "<h1>Text</h1>".wont_have_text('Text')
+          end.must_raise_with_message(/expected there not to be text "Text" in "Text"/)
+        end
+      end
+    end
+
+    context "on a page or node" do
+      before do
+        visit('/with_html')
+      end
+
+      context "with should" do
+        it "passes if has_text? returns true" do
+          page.must_have_text('This is a test')
+        end
+
+        it "passes if has_text? returns true using regexp" do
+          page.must_have_text(/test/)
+        end
+
+        it "fails if has_text? returns false" do
+          expect do
+            page.must_have_text('No such Text')
+          end.must_raise_with_message(/expected there to be text "No such Text" in "(.*)This is a test(.*)"/)
+        end
+
+        context "with default selector CSS" do
+          before { Capybara.default_selector = :css }
+          it "fails if has_text? returns false" do
+            expect do
+              page.must_have_text('No such Text')
+            end.must_raise_with_message(/expected there to be text "No such Text" in "(.*)This is a test(.*)"/)
+          end
+          after { Capybara.default_selector = :xpath }
+        end
+      end
+
+      context "with should_not" do
+        it "passes if has_no_text? returns true" do
+          page.wont_have_text('No such Text')
+        end
+
+        it "fails if has_no_text? returns false" do
+          expect do
+            page.wont_have_text('This is a test')
+          end.must_raise_with_message(/expected there not to be text "This is a test"/)
+        end
+      end
+    end
+  end
+
+  describe "have_link matcher" do
+    let(:html) { '<a href="#">Just a link</a>' }
+
+    it "gives proper description" do
+      have_link('Just a link').description.must_equal "have link \"Just a link\""
+    end
+
+    it "passes if there is such a button" do
+      html.must_have_link('Just a link')
+    end
+
+    it "fails if there is no such button" do
+      expect do
+        html.must_have_link('No such Link')
+      end.must_raise_with_message(/expected to find link "No such Link"/)
+    end
+  end
+
+  describe "have_button matcher" do
+    let(:html) { '<button>A button</button><input type="submit" value="Another button"/>' }
+
+    it "gives proper description" do
+      have_button('A button').description.must_equal "have button \"A button\""
+    end
+
+    it "passes if there is such a button" do
+      html.must_have_button('A button')
+    end
+
+    it "fails if there is no such button" do
+      expect do
+        html.must_have_button('No such Button')
+      end.must_raise_with_message(/expected to find button "No such Button"/)
+    end
+  end
+
+  describe "have_field matcher" do
+    let(:html) { '<p><label>Text field<input type="text"/></label></p>' }
+
+    it "gives proper description" do
+      have_field('Text field').description.must_equal "have field \"Text field\""
+    end
+
+    it "passes if there is such a field" do
+      html.must_have_field('Text field')
+    end
+
+    it "fails if there is no such field" do
+      expect do
+        html.must_have_field('No such Field')
+      end.must_raise_with_message(/expected to find field "No such Field"/)
+    end
+  end
+
+  describe "have_checked_field matcher" do
+    let(:html) do
+      '<label>it is checked<input type="checkbox" checked="checked"/></label>
+      <label>unchecked field<input type="checkbox"/></label>'
+    end
+
+    it "gives proper description" do
+      have_checked_field('it is checked').description.must_equal "have field \"it is checked\""
+    end
+
+    context "with should" do
+      it "passes if there is such a field and it is checked" do
+        html.must_have_checked_field('it is checked')
+      end
+
+      it "fails if there is such a field but it is not checked" do
+        expect do
+          html.must_have_checked_field('unchecked field')
+        end.must_raise_with_message(/expected to find field "unchecked field"/)
+      end
+
+      it "fails if there is no such field" do
+        expect do
+          html.must_have_checked_field('no such field')
+        end.must_raise_with_message(/expected to find field "no such field"/)
+      end
+    end
+
+    context "with should not" do
+      it "fails if there is such a field and it is checked" do
+        expect do
+          html.wont_have_checked_field('it is checked')
+        end.must_raise_with_message(/expected not to find field "it is checked"/)
+      end
+
+      it "passes if there is such a field but it is not checked" do
+        html.wont_have_checked_field('unchecked field')
+      end
+
+      it "passes if there is no such field" do
+        html.wont_have_checked_field('no such field')
+      end
+    end
+  end
+
+  describe "have_unchecked_field matcher" do
+    let(:html) do
+      '<label>it is checked<input type="checkbox" checked="checked"/></label>
+      <label>unchecked field<input type="checkbox"/></label>'
+    end
+
+    it "gives proper description" do
+      have_unchecked_field('unchecked field').description.must_equal "have field \"unchecked field\""
+    end
+
+    context "with should" do
+      it "passes if there is such a field and it is not checked" do
+        html.must_have_unchecked_field('unchecked field')
+      end
+
+      it "fails if there is such a field but it is checked" do
+        expect do
+          html.must_have_unchecked_field('it is checked')
+        end.must_raise_with_message(/expected to find field "it is checked"/)
+      end
+
+      it "fails if there is no such field" do
+        expect do
+          html.must_have_unchecked_field('no such field')
+        end.must_raise_with_message(/expected to find field "no such field"/)
+      end
+    end
+
+    context "with should not" do
+      it "fails if there is such a field and it is not checked" do
+        expect do
+          html.wont_have_unchecked_field('unchecked field')
+        end.must_raise_with_message(/expected not to find field "unchecked field"/)
+      end
+
+      it "passes if there is such a field but it is checked" do
+        html.wont_have_unchecked_field('it is checked')
+      end
+
+      it "passes if there is no such field" do
+        html.wont_have_unchecked_field('no such field')
+      end
+    end
+  end
+
+  describe "have_select matcher" do
+    let(:html) { '<label>Select Box<select></select></label>' }
+
+    it "gives proper description" do
+      have_select('Select Box').description.must_equal "have select box \"Select Box\""
+    end
+
+    it "passes if there is such a select" do
+      html.must_have_select('Select Box')
+    end
+
+    it "fails if there is no such select" do
+      expect do
+        html.must_have_select('No such Select box')
+      end.must_raise_with_message(/expected to find select box "No such Select box"/)
+    end
+  end
+
+  describe "have_table matcher" do
+    let(:html) { '<table><caption>Lovely table</caption></table>' }
+
+    it "gives proper description" do
+      have_table('Lovely table').description.must_equal "have table \"Lovely table\""
+    end
+
+    it "passes if there is such a select" do
+      html.must_have_table('Lovely table')
+    end
+
+    it "fails if there is no such select" do
+      expect do
+        html.must_have_table('No such Table')
+      end.must_raise_with_message(/expected to find table "No such Table"/)
+    end
+  end
+end
+