diff options
| author | Graeme Geldenhuys <graemeg@gmail.com> | 2015-08-06 00:00:18 +0100 |
|---|---|---|
| committer | Graeme Geldenhuys <graemeg@gmail.com> | 2015-08-06 00:01:20 +0100 |
| commit | da4db3af243946159219ed468148b55282e5b349 (patch) | |
| tree | dd65a6525c8be6e9b50e5c05f360b63cd0538e8e | |
| parent | f6ccef1d73ba7ef2bd1fa5019fdbc633038e8075 (diff) | |
| download | fpGUI-da4db3af243946159219ed468148b55282e5b349.tar.xz | |
RichText: fixed the bug where Underlined text didn't work.
A simple spelling mistake!
| -rw-r--r-- | docview/components/richtext/CanvasFontManager.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/docview/components/richtext/CanvasFontManager.pas b/docview/components/richtext/CanvasFontManager.pas index e650141b..71e6d2fa 100644 --- a/docview/components/richtext/CanvasFontManager.pas +++ b/docview/components/richtext/CanvasFontManager.pas @@ -179,8 +179,8 @@ begin AFontDesc := AFontDesc + ':Strikeout'; if faUnderScore in Attrs Then - if Pos(':Underscore', AFontDesc) = 0 then - AFontDesc := AFontDesc + ':Underscore'; + if Pos(':Underline', AFontDesc) = 0 then + AFontDesc := AFontDesc + ':Underline'; end; // Provide font name substitutes for some common bitmap fonts found in INF files |