Add missing spec that shows a regression after e3bcf5.

jamesbebbington · Apr 13, 2010 · 2c9de38 · 2c9de38
1 parent 2a6c67b
commit 2c9de38
Show file tree

Hide file tree

Showing 2 changed files with 25 additions and 1 deletion.
diff --git a/spec/integration/mechanize/sample_app.rb b/spec/integration/mechanize/sample_app.rb
@@ -16,4 +16,20 @@ class SampleApp < Sinatra::Default
   get "/redirected" do
     "Redirected"
   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
diff --git a/spec/integration/mechanize/spec/mechanize_spec.rb b/spec/integration/mechanize/spec/mechanize_spec.rb
@@ -12,7 +12,15 @@
   end
 
   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
     pending do
       response = visit("http://localhost:9292/external_redirect")