diff --git a/scripts/tkremind.in b/scripts/tkremind.in
index 8acb5a0b..8cbb079d 100644
--- a/scripts/tkremind.in
+++ b/scripts/tkremind.in
@@ -5002,7 +5002,7 @@ proc ShowManPage { cmd jump destroy } {
             $w.t tag configure underline -underlinefg $link_color
         }
         scrollbar $w.sb -orient vertical -command "$w.t yview"
-        button $w.ok -text OK -command [list destroy $w] -foreground $Option(TextColor) -background $Option(BackgroundColor) -highlightthickness 1 -highlightcolor $Option(LineColor) -highlightbackground $Option(WinBackground)
+        button $w.ok -text OK -command [list destroy $w] -foreground $Option(LabelColor) -background $Option(BackgroundColor) -highlightthickness 1 -highlightcolor $Option(LineColor) -highlightbackground $Option(WinBackground)
         grid $w.t -row 0 -column 0 -sticky nsew
         grid $w.sb -row 0 -column 1 -sticky ns
         grid $w.ok -row 1 -column 0 -stick w