From 868ae0375e528aaee681ca26e101397f53202db1 Mon Sep 17 00:00:00 2001
From: Dylan Egan <dylanegan@gmail.com>
Date: Wed, 4 Jul 2012 17:33:51 +0200
Subject: [PATCH] Add a failure for #1014. :v:

---
 tests/aws/models/dns/records_tests.rb | 20 +++++++++++++++++++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/tests/aws/models/dns/records_tests.rb b/tests/aws/models/dns/records_tests.rb
index ebc375991..c33c28373 100644
--- a/tests/aws/models/dns/records_tests.rb
+++ b/tests/aws/models/dns/records_tests.rb
@@ -1,6 +1,6 @@
 Shindo.tests("Fog::DNS[:aws] | records", ['aws', 'dns']) do
-
   pending if Fog.mocking?
+
   tests("zones#create").succeeds do
     @zone = Fog::DNS[:aws].zones.create(:domain => generate_unique_domain)
   end
@@ -16,6 +16,24 @@ Shindo.tests("Fog::DNS[:aws] | records", ['aws', 'dns']) do
     collection_tests(@zone.records, params, false)
   end
 
+  records = []
+
+  100.times do |i|
+    records << @zone.records.create(:name => "#{i}.#{@zone.domain}", :type => "A", :ttl => 3600, :value => ['1.2.3.4'])
+  end
+
+  tests("#all!").returns(102) do
+    @zone.records.all!.size
+  end
+
+  tests("#all!").returns(102) do
+    @zone.records.all!.size
+  end
+
+  records.each do |record|
+    record.destroy
+  end
+
   tests("zones#destroy").succeeds do
     @zone.destroy
   end