diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index a94ddb2e20..574147d528 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -6526,8 +6526,6 @@ begin
 end;
 
 procedure TSourceNotebook.CloseTabClicked(Sender: TObject);
-var
-  TabIndex: Integer;
 begin
   CloseClicked(Sender,
               (GetKeyState(VK_CONTROL) < 0) and EditorOpts.CtrlMiddleTabClickClosesOthers);