1 files changed, 1 insertions, 5 deletions
diff --git a/plugins/HistoryPlusPlus/hpp_options.pas b/plugins/HistoryPlusPlus/hpp_options.pas
index cafbbabd2f..a64505f63b 100644
--- a/plugins/HistoryPlusPlus/hpp_options.pas
+++ b/plugins/HistoryPlusPlus/hpp_options.pas
@@ -362,14 +362,10 @@ function LoadFont(Order: Integer; F: TFont): TFont;
 const
   size: Integer = -11;
 var
-  fid: TFontID;
   lf: TLogFontA;
   col: TColor;
 begin
-  fid.cbSize := sizeof(fid);
-  fid.group := hppName;
-  lstrcpya(fid.name, hppFontItems[Order].name { TRANSLATE-IGNORE } );
-  col := CallService(MS_FONT_GETA, WPARAM(@fid), LPARAM(@lf));
+  col := Font_Get(hppName, hppFontItems[Order].name, @lf);
   F.handle := CreateFontIndirectA(lf);
   F.color := col;
   Result := F;