diff options
Diffstat (limited to 'src/corelib')
-rw-r--r-- | src/corelib/gfxbase.pas | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/corelib/gfxbase.pas b/src/corelib/gfxbase.pas index 9dfb9830..efc06cac 100644 --- a/src/corelib/gfxbase.pas +++ b/src/corelib/gfxbase.pas @@ -788,6 +788,7 @@ begin { What was not handled: underline } if Pos('UNDERLINE', UpperCase(Font.FontDesc)) > 0 then begin + writeln('underline detected in font'); underline := (Font.Descent div 2) + 1; if underline = 0 then underline := 1; |