site_prism.vcr 0.0.1 → 0.1.0

checksums.yaml

@@ -1,15 +1,7 @@
 ---
-!binary "U0hBMQ==":
-  metadata.gz: !binary |-
-    Y2YwODQ0Y2JlYTZlMTI2YzIyMjA2Y2VhNmNiNDE5YTgwMmY4Y2E1ZQ==
-  data.tar.gz: !binary |-
-    YTU3ZWMxMGVkZWIyODA2MmQzZTcxZjZkMmZlNGQzMGI4MWVlNzhiZQ==
+SHA1:
+  metadata.gz: bea07665857e88334694b2c69c3d0ded874626cf
+  data.tar.gz: 7320da925829386acea9991b1572e0f93a9d0dd4
 SHA512:
-  metadata.gz: !binary |-
-    N2FmY2YxNGYyMTUwZmUzZjg4NDVlNWJhYmZiOWE1OGQyYjgxZDljOGZjNWFh
-    NTI2MDIyOGNkMjgyZjg1ZDJhODM2ZGMxNjA5M2RjMjc0NjVmNzQwOWNiY2Y0
-    ZTI4NTA5OThkY2JmOTFhYzliM2IwOTRmYjAxNjJlODA1YjI3NWQ=
-  data.tar.gz: !binary |-
-    YjE4MTFlYjE2MmIwOGM5YzJmZGQxMTg5M2RlOTI2ZjQyYjZjYjAyMWNiMDYz
-    OTlhM2ZhMDgwYzBkYzQ2NzQ3ZDY3YTA5YWI0YzkxOWQ0Njc3ZDU5OTljZDhm
-    Mjk3MmNlMmY3Y2Q3ZmIyZWMxMTA5NTIxMWNlMWJkMjE4MzY2ZmQ=
+  metadata.gz: a7829ce24f5eab5d1a203712c9d38a362b0607af3f1cfd4c1d0c0b12d386f2c9b829ed1e06589940a9a471f7089094f15bf30fee9d8b19d4813d2fe10eb45a8e
+  data.tar.gz: 9ad8f2da29c6039106b5a7d03333c88b21cc87950926ab15806df271b1e044e8c6f03bfaf2afd9d042af250d218cf4100465692766f2380663a9450211e66d6d

data/.travis.yml

@@ -2,6 +2,7 @@ language: ruby
 rvm:
   - 2.0.0
   - 1.9.3
+  - jruby-19mode
 matrix:
   allow_failures:
     - rvm: jruby-19mode

data/CHANGELOG.md

@@ -0,0 +1,78 @@
+# Version 0.1.0
+
+## Changed
+
+  * dependencies. Now gem depends on Vcr 2.8.0 and SitePrism 2.5.
+  * re-factored the way how Vcr cassettes could be applying for any event of a page.
+    Before that change we had to use ugly way
+
+  ```ruby
+    @cars.apply_vcr(-> { page.find('#cars').click }) do
+      fixtures ['cars']
+    end
+  ```
+
+  now we use chainable way for this purpose
+
+  ```ruby
+    @cars = CarsPage.new
+
+    @cars.shift_event {
+      page.find('#cars').click
+    }.apply_vcr do
+      fixtures ['cars']
+    end
+  ```
+
+## Fixed
+
+  * the issue with defining an action to be done over cassettes in the adjusting block. Now even if an action is defined before a list of cassettes, the adjusting block will be performed properly
+
+  ```ruby
+    @products_page.cars_dropdown.click_and_apply_vcr do
+      replace
+      fixtures ['cars/ford/prices']
+    end
+  ```
+
+## Added
+
+  * possibility to apply Vcr cassettes for any event of an element. [Roman Rott and Dmitriy Nesteryuk]
+
+  ```ruby
+    @products_page.cars_dropdown.shift_event{
+      set 'Ford'
+    }.apply_vcr do
+      fixtures ['cars/ford/prices']
+    end
+  ```
+
+  * possibility to link Vcr with already defined elements, it will be helpful in case they are inherited
+
+  ```ruby
+    class CarsPage < TransportPage
+      link_vcr_with_element :transport_details_link do
+        fixtures ['cars/ford']
+      end
+    end
+
+    @page = CarsPage.new
+    @page.transport_details_link.click_and_apply_vcr
+  ```
+
+  * possibility to redefine default options for a default waiter
+
+  ```ruby
+    class ProductsPage < SitePrism::Page
+      link_vcr_with_element :details_link do
+        fixtures ['cars/ford']
+
+        waiter(eject_cassettes: false) { self.wait_until_loading_indicator_invisible } # default waiter with options
+      end
+    end
+
+    @page = ProductsPage.new
+    @page.details_link.click_and_apply_vcr do
+      waiter_options(eject_cassettes: true) # redefines default options
+    end
+  ```

data/Gemfile

@@ -8,9 +8,11 @@ group :development do
   gem 'sinatra'
   gem 'httpi'
   gem 'capybara-firebug'
+  gem 'sandi_meter'
 end
 
 group :test do
+  gem 'rspec-fire'
   gem 'selenium-webdriver'
   gem 'coveralls', require: false
 end

data/README.md

@@ -1,21 +1,21 @@
 # SitePrism.Vcr
 
 [![Code Climate](https://codeclimate.com/github/nestd/site_prism.vcr.png)](https://codeclimate.com/github/nestd/site_prism.vcr)
-[![Build Status](https://secure.travis-ci.org/nestd/site_prism.vcr.png?branch=master)](https://travis-ci.org/nestd/site_prism.vcr)
-[![Coverage Status](https://coveralls.io/repos/nestd/site_prism.vcr/badge.png)](https://coveralls.io/r/nestd/site_prism.vcr)
-[![Dependency Status](https://gemnasium.com/nestd/site_prism.vcr.png)](https://gemnasium.com/nestd/site_prism.vcr)
+[![Build Status](https://secure.travis-ci.org/dnesteryuk/site_prism.vcr.png?branch=master)](https://travis-ci.org/dnesteryuk/site_prism.vcr)
+[![Coverage Status](https://coveralls.io/repos/dnesteryuk/site_prism.vcr/badge.png)](https://coveralls.io/r/dnesteryuk/site_prism.vcr)
+[![Dependency Status](https://gemnasium.com/dnesteryuk/site_prism.vcr.png)](https://gemnasium.com/dnesteryuk/site_prism.vcr)
 
 The purpose of this gem is to give an easy way for integrating [SitePrism](https://github.com/natritmeyer/site_prism) (it is Page Object Model DSL for Capybara) and [VCR](https://github.com/vcr/vcr) (it is a powerful tool for recording and stubbing HTTP interactions).
 
-Such integration allows you to write acceptance tests more easily since you receive handy tool for managing VCR cassettes. Those cassettes can be easily linked with SitePrism elements (in fact, Capybara elements since SitePrism doesn't have own elements). Afterwards those linked cassettes can be used for stubbing external API responses while clicking on an element that cassettes are defined for.
+Such integration allows you to write acceptance tests more easily since you receive handy tool for managing VCR cassettes. Those cassettes can be easily linked with SitePrism elements (in fact, Capybara elements since SitePrism doesn't have own elements). Afterwards those linked cassettes can be used for stubbing external API responses while doing actions (click, change etc) over an element that cassettes are defined for.
 
 ## Features
 
   * Links VCR cassettes with SitePrism elements.
   * Links VCR cassettes with SitePrism pages.
-  * Applies VCR cassettes while clicking on an element.
-  * Applies VCR cassettes while loading a page.
-  * Defines a waiter which will be used for waiting until an expected element is on a page or until an expected element has disappeared from a page (It is very helpful when a few external API requests are being executed after clicking on an element).
+  * Applies VCR cassettes on any event (click, change, blur etc).
+  * Applies VCR cassettes on page loading.
+  * Defines a waiter which will be used for waiting until an expected element is on a page or until an expected element has disappeared from a page (It is very helpful when a few external API requests are being executed after raising an event).
   * Allows to redefine default VCR cassettes (cassettes which were specified while describing a SitePrism element or a SitePrism page).
   * Allows to redefine a default waiter (a waiter which was specified while describing a SitePrism element or a SitePrism page).
 
@@ -51,6 +51,20 @@ end
 
 `fixtures` helper method is used for defining VCR cassettes. All cassettes are taken from a path which you have defined in `cassette_library_dir` configuration option of VCR. Please, refer to [documentation](https://relishapp.com/vcr/vcr/v/2-5-0/docs/configuration/cassette-library-dir) of VCR to get more info about configuration options.
 
+You can specify cassettes for already defined elements, for example, your page inherits another one:
+
+```ruby
+class TransportPage < SitePrism::Page
+  element :transport_details_link, '#car_details'
+end
+
+class CarsPage < TransportPage
+  link_vcr_with_element :transport_details_link do
+    fixtures ['cars/ford']
+  end
+end
+```
+
 #### Path helper method
 
 In case you have a lot of cassettes which are stored in some subdirectory, there is more better way for defining cassettes:
@@ -66,7 +80,8 @@ class ProductsPage < SitePrism::Page
 end
 ```
 
-The `path` helper method can be used a few times in a block to define cassettes. The code above is identical to:
+The `path` helper method can be used a few times in a block to define cassettes.
+The code above is identical to:
 
 ```ruby
 class ProductsPage < SitePrism::Page
@@ -100,7 +115,7 @@ class ProductsPage < SitePrism::Page
 end
 ```
 
-If some fixture name begins with `~/`, it means that a defined home path will be applied to find such fixture. The previous example is identical to this one:
+If some cassette name begins with `~/`, it means that a defined home path will be applied to find such cassette. The previous example is identical to this one:
 
 ```ruby
 class ProductsPage < SitePrism::Page
@@ -134,7 +149,7 @@ end
 
 ### Applying VCR cassettes on click
 
-Now cassettes can be applied only on a click event:
+Cassettes can be applied on a click event:
 
 ```ruby
 @products_page.car_details_link.click_and_apply_vcr
@@ -229,7 +244,7 @@ end
 
 ### Waiters
 
-Waiters are very important part of this gem (actually, waiters are part of SitePrism gem, but they are used widely here). When we do some action and that action causes a few HTTP interactions we have to wait for a result of them, before expecting something on a page. The good approach is to wait for some visibility or invisibility of an element. For example, you have a list of products when you click on a button to show details of some product, you may wait until loading indicator which may be shown on a details page of a product disappears. Capybara already waits for an element to appear, but it hasn't any possibility to wait for invisibility of an element, SitePrism has this capability and it is very useful.
+Waiters are very important part of this gem (actually, waiters are part of SitePrism gem, but they are used widely here). When we do some action and that action causes a few HTTP interactions we have to wait for a result of them before expecting something on a page. The good approach is to wait for some visibility or invisibility of an element. For example, you have a list of products when you click on a button to show details of some product, you may wait until loading indicator which may be shown on a details page of a product disappears. Capybara already waits for an element to appear, but it hasn't any possibility to wait for invisibility of an element, SitePrism has this capability and it is very useful.
 
 There is reason why you should use them when you use SitePrism.Vcr. If you specify a waiter while describing SitePrism elements or applying VCR cassettes, SitePrism.Vcr will know when the inserted cassettes should be ejected from Vcr to avoid a situation when some unexpected cassette is applied.
 
@@ -292,6 +307,36 @@ end
 
 The same thing can be defined for a default waiter.
 
+In case you need to change only options defined for a default waiter, but you don't need to change a waiter, you can use `waiter_options` helper method:
+
+```ruby
+@products_page.car_details_link.click_and_apply_vcr do
+  waiter_options(eject_cassettes: false)
+end
+```
+
+### Applying VCR cassettes on any event
+
+There may be a situation when you need to apply cassettes for some custom event rather than for a click event. It may be a change event for a select box or a drag-and-drop event for a list or a blur event for an input element. SitePrism.Vcr gem provides a way to archive such goal:
+
+```ruby
+@products_page.cars_dropdown.shift_event{
+  set 'Ford'
+}.apply_vcr # uses default fixtures defined for this element
+```
+
+or if you need to use another cassettes:
+
+```ruby
+@products_page.cars_dropdown.shift_event{
+  set 'Ford'
+}.apply_vcr do
+  fixtures ['cars/ford/prices']
+end
+```
+
+The block which is passed to `shift_event` method is executed in a context of an element, it means any method of [Capybara::Node::Element](http://rubydoc.info/github/jnicklas/capybara/master/Capybara/Node/Element) object can be used there. Similar to `click_and_apply_vcr` method, you can override cassettes, add new cassettes, use `path` helper method while applying cassettes and `home_path` helper method specified while defining a SitePrism element.
+
 ### Linking and applying VCR cassettes with SitePrism pages
 
 External HTTP interactions may be done on page loading as well. This gem supports capability to apply Vcr cassettes on page loading. To define default cassettes you have to use `vcr_options_for_load` class method:
@@ -306,7 +351,7 @@ end
 
 Everything described above about defining cassettes for SitePrism elements is true for defining cassettes for pages.
 
-Applying cassettes is almost the same as we saw for a click event:
+Applying cassettes is almost the same as you saw for a click event:
 
 ```ruby
 page.load_and_apply_vcr do
@@ -332,18 +377,6 @@ In this case, SitePrism will alter an url and it will look like:
 http://localhost/cats/tom
 ```
 
-There may be situation when we need to apply fixtures for page loading when an user clicks on a link (an user moves from one page to another one). In this case you can use `apply_vcr` method of a page object:
-
-```ruby
-@cars = CarsPage.new
-
-@cars.apply_vcr(-> { page.find('#cars').click }) do
-  fixtures ['cars']
-end
-```
-
-The first argument passed to this method should be a proc object which will do an action. As you can see while applying fixtures without actual loading a page you can use everything what is described for `load_and_apply_vcr` method.
-
 ### Using Vcr options for cassettes
 
 Vcr provides number of options which can be used for cassettes. For example, you may [pass ERB into cassettes](https://relishapp.com/vcr/vcr/v/2-5-0/docs/cassettes/dynamic-erb-cassettes). This gem doesn't bother you use any options for Vcr cassettes. If you want to do so, you have to use a hash instead of a cassette name:
@@ -368,6 +401,10 @@ It works with any kind of helper methods where you list names of cassettes, even
 end
 ```
 
+## Examples
+
+The simple example of using this gem you can find [here](https://github.com/dnesteryuk/site_prism.vcr_example)
+
 ## Contributing
 
 1. Fork it

data/TODO.md

@@ -1,37 +1,30 @@
 # TODO
 
-## Release 0.0.1
-
-1. Add comments to code and review existing comments.
-
-## Release 0.0.2
-
-1. Think about adding more integration tests
-2. Pages and elements should inherit fixtures defined for their parents
-3. Add possibility to add fixtures for existing elements, it will be helpful in case they are inherited
-4. Think about applying fixtures for any kind of events, for example, for a change event of select boxes
-5. Think how to manage the situation when a method name and a block is passed to the `waiter` helper method
-6. When we eject fixtures from Vcr we should eject only fixtures inserted into Vcr by one specific fixtures manager (See SPV#eject)
-7. Make this gem working on JRuby
-8. Give possibility to define options for a waiter instead of redefining a whole waiter in a subclass
-9. Turn this code:
-
-```ruby
-@cars.apply_vcr(-> { page.find('#cars').click }) do
-  fixtures ['cars']
-end
-```
-
-into
+## Release 0.1.1
+
+1. Change integration tests to use real data.
+2. Think how to avoid monkey patching to add stuffs to SitePrism
+3. SPV::Applier#apply_vcr should be refactored, it is too complex
+4. Think about renaming current integration tests on acceptance tests and create new integration tests which will test integration between classes without involving a browser. It will solve a lot of issues with shared tests to check the same things for pages and elements. In acceptance tests we will test very basic stuffs.
+5. We should freeze an instance of SPV::Fixtures to make sure it is not mutable, otherwise, there may be situation when default fixtures will be corrupted.
+6. We should disable double defining actions in the adjusting block:
+
+  ```ruby
+    self.some_link.click_and_apply_vcr do
+      fixtures ['test', 'test2']
+      union
+      fixtures ['test3']
+      replace
+    end
+  ```
+It will lead to mess.
 
-```ruby
-@cars.shift_event{ page.find('#cars').click }.apply_vcr do
-  fixtures ['cars']
-end
-```
+## Release 0.2.0
 
-10. Think about creating set of fixtures which can be exchanged by a name of set. It will be very helpful when you have to exchange a set of fixtures.
-11. Think how to avoid monkey patching to add stuffs to SitePrism
+1. Pages and elements should inherit fixtures defined for their parents
+2. When we eject fixtures from Vcr we should eject only fixtures inserted into Vcr by one specific fixtures manager (See SPV#eject)
+3. Make this gem working on JRuby (since we eject all VCR cassettes, it may be not thread safe)
+4. Think about creating set of fixtures which can be exchanged by a name of set. It will be very helpful when you have to exchange a set of fixtures.
 
 ## Should be implemented?
 
@@ -54,18 +47,13 @@ end
 
   will use previously defined fixtures
 
-2. There should be possibility to change default fixtures:
-
-    ```ruby
-    self.confirm_btn.vcr do
-      path 'products', ['tomato', 'fruit/apple']
-      path 'goods', 'cars'
-
-      force_replace
-    end
-    ```
 
 ## Things to think over
 
 1. Should we add the integration tests for page load to make sure 2 HTTP requests will be handled properly?
 2. Should we add own integration tests to test the path helper method?
+3. Should we add a test for testing to HTTP requests on page load?
+4. Should be Options class immutable?
+5. May be it makes sense to separately keep path from the name of a fixture? See SPV::Fixture class
+
+

data/lib/site_prism_vcr/applier.rb

@@ -2,6 +2,8 @@ module SPV
   # This class manages defining default fixtures
   # and applying them on an event.
   class Applier
+    class EventError < StandardError; end
+
     def initialize(node, &block)
       @node, @options = node, Options.new
       adjuster = DSL::InitialAdjuster.new(@options)
@@ -10,11 +12,17 @@ module SPV
         adjuster.instance_eval &block
       end
 
-      @fixtures = adjuster.prepared_fixtures
+      @fixtures = adjuster.prepare_fixtures
 
       @fixtures_manager = Fixtures::Manager.new(@options)
     end
 
+    def shift_event(&block)
+      @event_action = block
+
+      self
+    end
+
     # Applies fixtures to be used for stubbing HTTP interactions
     # caused by an event (click on an element or page loading).
     #
@@ -26,7 +34,13 @@ module SPV
     #  and @see SPV::DSL::Adjuster)
     #
     # @return [void]
-    def apply(adjusting_block = nil)
+    def apply_vcr(&block)
+      if @event_action.nil?
+        raise EventError.new(
+          'Event is not shifted, before applying Vcr you have to shift event with "shift_event" method'
+        )
+      end
+
       options = @options.clone_options
 
       adjuster = DSL::Adjuster.new(
@@ -34,13 +48,13 @@ module SPV
         @fixtures
       )
 
-      if adjusting_block
-        adjuster.instance_eval &adjusting_block
+      if block_given?
+        adjuster.instance_eval &block
       end
 
-      @fixtures_manager.inject(adjuster.prepared_fixtures)
+      @fixtures_manager.inject(adjuster.prepare_fixtures)
 
-      yield
+      @event_action.call
 
       @waiter = Waiter.new(
         @node,

data/lib/site_prism_vcr/dsl/adjuster.rb

@@ -7,26 +7,45 @@ module SPV
         super options
 
         @options, @fixtures = options, fixtures
+        @action = :replace
       end
 
-      # Replaces default fixtures with a set of fixtures
-      # defined in a block passed while applying fixtures.
+      # Defines the replace action as an action which
+      # will be performed over cassettes while adjusting cassettes.
+      #
+      # Example:
+      #   @page.details_link.click_and_apply_vcr do
+      #     fixtures ['no_found']
+      #     replace
+      #   end
+      #
+      # In this case 'no_found' cassette will be used instead
+      # of default cassettes defined for 'details_link'.
       #
       # @return [void]
       #
       # @api public
       def replace
-        change_fixtures :replace
+        @action = :replace
       end
 
-      # Joins default fixtures with a set of fixtures
-      # defined in a block passed while applying fixtures.
+      # Defines the union action as an action which
+      # will be performed over cassettes while adjusting cassettes.
+      #
+      # Example:
+      #   @page.details_link.click_and_apply_vcr do
+      #     fixtures ['no_found']
+      #     union
+      #   end
+      #
+      # In this case 'no_found' cassette will be used a long with
+      # default cassettes.
       #
       # @return [void]
       #
       # @api public
       def union
-        change_fixtures :union
+        @action = :union
       end
 
       # Exchanges certain default fixtures with another fixtures.
@@ -57,26 +76,28 @@ module SPV
         )
       end
 
+      # Redefines default waiter options or if default waiter options is not defined,
+      # it defines new options for a waiter. This method doesn't redefine all default options,
+      # it redefines only options passed in a hash.
+      #
+      # @param options [Hash] Options for a waiter
+      #
+      # @return [void]
+      #
+      # @api public
+      def waiter_options(options)
+        @options.merge_waiter_options!(options)
+      end
+
       # Performs the replace action when no explicit action is defined
       # in a block for manipulating fixtures before applying them.
       #
       # @return [SPV::Fixtures] A set of prepared fixtures.
       #
       # @api public
-      def prepared_fixtures
-        # If no action has been performed,
-        # it should be performed manually, before allowing
-        # to get prepared fixtures.
-        replace unless @is_action_done # TODO: do something with this logic, it looks ugly
-        @fixtures
+      def prepare_fixtures
+        @fixtures.public_send(@action, @tmp_keeper.fixtures)
       end
-
-      private
-        def change_fixtures(action)
-          @fixtures = @fixtures.public_send(action, @tmp_keeper.fixtures)
-          @tmp_keeper.clean_fixtures
-          @is_action_done = true
-        end
     end # class Adjuster
   end # module DSL
 end # module SPV

data/lib/site_prism_vcr/dsl/initial_adjuster.rb

@@ -89,7 +89,7 @@ module SPV
       # @return [SPV::Fixtures] A set of prepared fixtures.
       #
       # @api public
-      def prepared_fixtures
+      def prepare_fixtures
         Fixtures.new(@tmp_keeper.fixtures)
       end
     end # class InitialAdjuster

data/lib/site_prism_vcr/element.rb

@@ -1,18 +1,21 @@
 require 'delegate'
+require 'forwardable'
 
 module SPV
   # Extends a native Capybara element with new methods.
   class Element < SimpleDelegator
+    extend Forwardable
+
+    def_delegator :@applier, :shift_event
+
     def initialize(element, parent, &block)
       super element
 
       @applier = Applier.new(parent, &block)
     end
 
-    def click_and_apply_vcr(&adjusting_block)
-      @applier.apply(adjusting_block) do
-        click
-      end
+    def click_and_apply_vcr(&block)
+      shift_event { click }.apply_vcr(&block)
     end
   end
-end
+end

data/lib/site_prism_vcr/fixture.rb

@@ -4,7 +4,6 @@ module SPV
   class Fixture
     attr_accessor :name, :options
 
-    # TODO: may be it makes sense to separately keep path from the name of a fixture?
     def initialize(name, vcr_options = {})
       @name, @options = name, vcr_options
     end

data/lib/site_prism_vcr/options.rb

@@ -1,4 +1,3 @@
-# TODO: should be this class immutable?
 module SPV
   class Options
     attr_accessor :waiter, :waiter_options, :home_path
@@ -18,5 +17,17 @@ module SPV
     def clone_options
       dup
     end
+
+    def waiter_options
+      @waiter_options || {}
+    end
+
+    # Merges already defined waiter's options with a given hash.
+    #
+    # If waiter's options are not defined yet, it will define waiter options
+    # with a given hash.
+    def merge_waiter_options!(options)
+      self.waiter_options = self.waiter_options.merge(options)
+    end
   end
 end

data/lib/site_prism_vcr/patches/element_container.rb

@@ -2,6 +2,10 @@ module SitePrism::ElementContainer
   def element_with_vcr(element_name, *args, &block)
     element element_name, *args
 
+    link_vcr_with_element(element_name, &block)
+  end
+
+  def link_vcr_with_element(element_name, &block)
     origin_element_name = "origin_#{element_name}"
 
     alias_method origin_element_name, element_name

data/lib/site_prism_vcr/patches/page.rb

@@ -1,41 +1,39 @@
+require 'forwardable'
+
 module SitePrism
   class Page
-    # TODO: it should make sure this method does not a native method of SitePrism::Page class
-    def self.inherited(subclass)
-      # This code is required to allow subpages to inherit
-      # a defined adjuster block. Otherwise, that block should be
-      # duplicated in a subpage as well.
-      subclass.instance_variable_set(:@vcr_adjuster, @vcr_adjuster)
-    end
+    extend Forwardable
 
-    def self.vcr_options_for_load(&block)
-      @vcr_adjuster = block
-    end
+    def_delegator :@applier, :shift_event
 
-    def self.vcr_adjuster
-      @vcr_adjuster
-    end
+    class << self
+      def inherited(subclass)
+        # This code is required to allow subpages to inherit
+        # a defined adjuster block. Otherwise, that block should be
+        # duplicated in a subpage as well.
+        subclass.instance_variable_set(:@vcr_adjuster, @vcr_adjuster)
+      end
 
-    def apply_vcr(*args, action_block, &adjusting_block)
-      applier = SPV::Applier.new(
-        self,
-        &self.class.vcr_adjuster
-      )
+      def vcr_options_for_load(&block)
+        @vcr_adjuster = block
+      end
 
-      applier.apply(
-        adjusting_block
-      ) do
-        action_block.call
+      def vcr_adjuster
+        @vcr_adjuster
       end
     end
 
-    def load_and_apply_vcr(*args, &adjusting_block)
-      action_block = proc { load(*args) }
+    def initialize(*args)
+      super
 
-      apply_vcr(
-        action_block,
-        &adjusting_block
+      @applier = SPV::Applier.new(
+        self,
+        &self.class.vcr_adjuster
       )
     end
+
+    def load_and_apply_vcr(*args, &block)
+      shift_event { load(*args) }.apply_vcr(&block)
+    end
   end
 end