Add missing spec that shows a regression after e3bcf5.

This commit is contained in:
Damian Janowski 2010-04-13 12:57:25 -03:00
parent 2a6c67b17b
commit 2c9de38129
2 changed files with 25 additions and 1 deletions

View File

@ -16,4 +16,20 @@ class SampleApp < Sinatra::Default
get "/redirected" do get "/redirected" do
"Redirected" "Redirected"
end end
get "/form" do
<<-EOS
<html>
<form action="/form" method="post">
<input type="hidden" name="_method" value="put" />
<label for="email">Email:</label> <input type="text" id="email" name="email" /></label>
<input type="submit" value="Add" />
</form>
</html>
EOS
end
put "/form" do
"Welcome #{params[:email]}"
end
end end

View File

@ -12,7 +12,15 @@ describe "Webrat's Mechanize mode" do
end end
it "should follow links" it "should follow links"
it "should submit forms"
it "should submit forms" do
visit "http://localhost:9292/form"
fill_in "Email", :with => "albert@example.com"
click_button "Add"
response.should contain("Welcome albert@example.com")
end
it "should not follow external redirects" do it "should not follow external redirects" do
pending do pending do
response = visit("http://localhost:9292/external_redirect") response = visit("http://localhost:9292/external_redirect")