rename Deparse to TraceFormatter and add ambient indent level

[scpubgit/DX.git] / lib / DX / Step / CompleteRecheck.pm

diff --git a/lib/DX/Step/CompleteRecheck.pm b/lib/DX/Step/CompleteRecheck.pm
index f74f90c..8886f3c 100644 (file)
--- a/lib/DX/Step/CompleteRecheck.pm
+++ b/lib/DX/Step/CompleteRecheck.pm
@@ -12,6 +12,7 @@ sub apply_to {
   my ($self, $ss) = @_;
 
   trace recheck => [ statement => [ [ symbol => 'complete_recheck' ] ] ];
+  trace recheck => [ 'leave_block' ];
 
   my $prop = $self->was_recheck_for;
   my $re_ss = $self->resume_search_state;