X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FStep%2FFailRecheck.pm;fp=lib%2FDX%2FStep%2FFailRecheck.pm;h=d4d3d940848b381df7a536c916921ce87c92e0bb;hb=54da7534d82bd0625a5cc4887ec7819e68324b39;hp=82ab5dbeddfd50e75692e33b4d41f4173511bc53;hpb=ec22d7624b97f301a3515230efe5b3a67db66d0d;p=scpubgit%2FDX.git

diff --git a/lib/DX/Step/FailRecheck.pm b/lib/DX/Step/FailRecheck.pm
index 82ab5db..d4d3d94 100644
--- a/lib/DX/Step/FailRecheck.pm
+++ b/lib/DX/Step/FailRecheck.pm
@@ -6,11 +6,16 @@ with 'DX::Role::Step';
 
 has resume_search_state => (is => 'ro', isa => SearchState, required => 1);
 
+has resolution_space => (is => 'ro', isa => ResolutionSpace, required => 1);
+
 sub apply_to {
   my ($self, $old_ss) = @_;
   trace recheck => [ statement => [ [ symbol => 'fail_recheck' ] ] ];
   trace recheck => [ 'leave_block' ];
-  return $self->resume_search_state;
+  return $self->resume_search_state->but(
+    next_step
+      => $self->resolution_space->remaining_resolution_space->next_step
+  );
 }
 
 1;