diff --git a/mainunit.pas b/mainunit.pas
index 9e8335f..f1d5d65 100644
--- a/mainunit.pas
+++ b/mainunit.pas
@@ -785,6 +785,8 @@ procedure TForm1.CloseTabActionExecute(Sender: TObject);
   end;
   FilterTextByAwesomeBar;
 
+  LoadCaretAndView(MainTabs.TabIndex);
+
 end;
 
 procedure TForm1.DeselectSuggestionsTimerTimer(Sender: TObject);