forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix #304 - Terminal, bold text no visible

This commit is contained in:
Basile Burg 2018-04-25 01:54:52 +02:00
parent 54c66bc9a7
commit 4a24efc0bb
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
etc/terminal/gtk2term.pas
View File

@ -70,6 +70,9 @@ var
vte_terminal_set_color_foreground: procedure(terminal: PVteTerminal; vte_terminal_set_color_foreground: procedure(terminal: PVteTerminal;
const background: PGdkColor); cdecl; const background: PGdkColor); cdecl;
vte_terminal_set_color_bold: procedure(terminal: PVteTerminal;
const background: PGdkColor); cdecl;
vte_terminal_set_color_highlight: procedure(terminal: PVteTerminal; vte_terminal_set_color_highlight: procedure(terminal: PVteTerminal;
const background: PGdkColor); cdecl; const background: PGdkColor); cdecl;
@ -119,6 +122,8 @@ begin
'vte_terminal_set_color_background'); 'vte_terminal_set_color_background');
@vte_terminal_set_color_foreground := GetProcAddress(Lib, @vte_terminal_set_color_foreground := GetProcAddress(Lib,
'vte_terminal_set_color_foreground'); '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 := GetProcAddress(Lib,
'vte_terminal_set_color_highlight'); 'vte_terminal_set_color_highlight');
@vte_terminal_set_color_highlight_foreground := GetProcAddress(Lib, @vte_terminal_set_color_highlight_foreground := GetProcAddress(Lib,

4
etc/terminal/terminalctrls.pas
View File

@ -393,10 +393,12 @@ var
begin begin
fForegroundColor:=value; fForegroundColor:=value;
{$ifdef hasgtk2term} {$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 begin
c := TColortoTGDKColor(fForegroundColor); c := TColortoTGDKColor(fForegroundColor);
vte_terminal_set_color_foreground(fTerminalHanlde, @c); vte_terminal_set_color_foreground(fTerminalHanlde, @c);
vte_terminal_set_color_bold(fTerminalHanlde, @c);
end; end;
{$endif} {$endif}
end; end;