X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FQueryState.pm;h=4be7b1ce01a4d4bf437c0d8ab6d8abd0d1add5c9;hb=d6b0c811a7afc5fc2ca97f72ed1ab37b5c117e25;hp=ac247c10f8016ecea3254fc0f352c7a9c4adca5b;hpb=8cf755df2debdf733f2cc0797cd0aa3dd733f7af;p=scpubgit%2FDX.git

diff --git a/lib/DX/QueryState.pm b/lib/DX/QueryState.pm
index ac247c1..4be7b1c 100644
--- a/lib/DX/QueryState.pm
+++ b/lib/DX/QueryState.pm
@@ -70,6 +70,15 @@ sub with_additional_proposition {
                 );
         }
       }
+      if ((my $next_step = $ss->next_step)->can('original_search_state')) {
+         $but{next_step}
+           = $seen{$next_step}
+           ||= $next_step->but(
+                 original_search_state
+                   => $next_step->original_search_state->$_munge
+               );
+      }
+       
       $ss->but(%but);
     };
   };