X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FStep%2FCompleteRecheck.pm;h=f74f90c1f6e64e8012436efff129b8ead89ddb0d;hb=5b6cab1b3b47f9b24e7cde2a512270d0cad63150;hp=2c0a76e07cac3aa9f5cd3d3b6d7abc86a0c1674d;hpb=c25fbf056abf91b25ef365e9be2a84eb2b132dba;p=scpubgit%2FDX.git

diff --git a/lib/DX/Step/CompleteRecheck.pm b/lib/DX/Step/CompleteRecheck.pm
index 2c0a76e..f74f90c 100644
--- a/lib/DX/Step/CompleteRecheck.pm
+++ b/lib/DX/Step/CompleteRecheck.pm
@@ -11,6 +11,8 @@ has resume_search_state => (is => 'ro', isa => SearchState, required => 1);
 sub apply_to {
   my ($self, $ss) = @_;
 
+  trace recheck => [ statement => [ [ symbol => 'complete_recheck' ] ] ];
+
   my $prop = $self->was_recheck_for;
   my $re_ss = $self->resume_search_state;
   my $re_hyp = $re_ss->current_hypothesis;