[Libreoffice-commits] core.git: vcl/win

[Caolán McNamara (via logerrit)]

 vcl/win/window/salframe.cxx |    7 +++++++
 1 file changed, 7 insertions(+)

New commits:
commit 87aef8ff9fa55dc8b51c6eb8ae07ab34236503c1
Author:     Caolán McNamara <caol...@redhat.com>
AuthorDate: Mon Oct 24 10:57:31 2022 +0100
Commit:     Caolán McNamara <caol...@redhat.com>
CommitDate: Mon Oct 24 13:11:06 2022 +0200

    for windows HighContrast use COLOR_HOTLIGHT for hyperlink color
    
    use the same thing for both unvisited and visited
    
    Change-Id: Icce13ccb88c7ca35e655f01e8ebb8ac92869753c
    Reviewed-on: https://gerrit.libreoffice.org/c/core/+/141729
    Tested-by: Jenkins
    Reviewed-by: Caolán McNamara <caol...@redhat.com>

diff --git a/vcl/win/window/salframe.cxx b/vcl/win/window/salframe.cxx
index 4307ed12ecbb..42c9a802c232 100644
--- a/vcl/win/window/salframe.cxx
+++ b/vcl/win/window/salframe.cxx
@@ -2712,6 +2712,13 @@ void WinSalFrame::UpdateSettings( AllSettings& rSettings 
)
     Color aHighlightButtonTextColor = aStyleSettings.GetHighContrastMode() ?
         aHighlightTextColor : aControlTextColor;
 
+    if (aStyleSettings.GetHighContrastMode())
+    {
+        Color aLinkColor(ImplWinColorToSal(GetSysColor(COLOR_HOTLIGHT)));
+        aStyleSettings.SetLinkColor(aLinkColor);
+        aStyleSettings.SetVisitedLinkColor(aLinkColor);
+    }
+
     aStyleSettings.SetDefaultButtonTextColor(aHighlightButtonTextColor);
     aStyleSettings.SetButtonTextColor(aControlTextColor);
     aStyleSettings.SetDefaultActionButtonTextColor(aHighlightButtonTextColor);