diff --git a/src/u_search.pas b/src/u_search.pas
index 6f960f6a..6cf5d35b 100644
--- a/src/u_search.pas
+++ b/src/u_search.pas
@@ -539,6 +539,7 @@ begin
     fHasSearched := true;
     fHasRestarted := false;
     chkFromCur.Checked := true;
+    fDoc.setFocus;
   end;
   updateImperative;
 end;