diff --git a/etc/terminal/gtk2term.pas b/etc/terminal/gtk2term.pas
index 2d777ae4..b2f19264 100644
--- a/etc/terminal/gtk2term.pas
+++ b/etc/terminal/gtk2term.pas
@@ -70,6 +70,9 @@ var
   vte_terminal_set_color_foreground: procedure(terminal: PVteTerminal;
     const background: PGdkColor); cdecl;
 
+  vte_terminal_set_color_bold: procedure(terminal: PVteTerminal;
+    const background: PGdkColor); cdecl;
+
   vte_terminal_set_color_highlight: procedure(terminal: PVteTerminal;
     const background: PGdkColor); cdecl;
 
@@ -119,6 +122,8 @@ begin
     'vte_terminal_set_color_background');
   @vte_terminal_set_color_foreground := GetProcAddress(Lib,
     'vte_terminal_set_color_foreground');
+  @vte_terminal_set_color_bold := GetProcAddress(Lib,
+    'vte_terminal_set_color_bold');
   @vte_terminal_set_color_highlight := GetProcAddress(Lib,
     'vte_terminal_set_color_highlight');
   @vte_terminal_set_color_highlight_foreground := GetProcAddress(Lib,
diff --git a/etc/terminal/terminalctrls.pas b/etc/terminal/terminalctrls.pas
index 96f931c9..39a43df6 100644
--- a/etc/terminal/terminalctrls.pas
+++ b/etc/terminal/terminalctrls.pas
@@ -393,10 +393,12 @@ var
 begin
   fForegroundColor:=value;
   {$ifdef hasgtk2term}
-  if assigned(fTerminalHanlde) and assigned(vte_terminal_set_color_foreground) then
+  if assigned(fTerminalHanlde) and assigned(vte_terminal_set_color_foreground) and
+    assigned(vte_terminal_set_color_bold) then
   begin
     c := TColortoTGDKColor(fForegroundColor);
     vte_terminal_set_color_foreground(fTerminalHanlde, @c);
+    vte_terminal_set_color_bold(fTerminalHanlde, @c);
   end;
   {$endif}
 end;