1 files changed, 1 insertions, 5 deletions
diff --git a/plugins/HistoryPlusPlus/EmptyHistoryForm.pas b/plugins/HistoryPlusPlus/EmptyHistoryForm.pas
index 011ca93876..dc416180bb 100644
--- a/plugins/HistoryPlusPlus/EmptyHistoryForm.pas
+++ b/plugins/HistoryPlusPlus/EmptyHistoryForm.pas
@@ -130,7 +130,7 @@ var
   HorzSpacing, VertSpacing,
   ButtonWidth, ButtonHeight, ButtonSpacing, ButtonGroupWidth,
   IconTextWidth, IconTextHeight: Integer;
-  TextRect,ContRect: TRect;
+  TextRect: TRect;
 begin
   DialogUnits := GetAveCharSize(Canvas);
   HorzSpacing   := MulDiv(mcSpacing, DialogUnits.X, 8);
@@ -189,10 +189,6 @@ begin
 end;
 
 procedure TEmptyHistoryFrm.SetContact(const Value: TMCONTACT);
-var
-  hContact: TMCONTACT;
-  Proto: AnsiString;
-  i,num: Integer;
 begin
   FContact := Value;
   Image.Picture.Icon.Handle := LoadIcon(0, IDI_QUESTION);