help.stylesheet: adding text-color to code-blocks.

diff --git a/basis/help/stylesheet/stylesheet.factor b/basis/help/stylesheet/stylesheet.factor
index 6796c603852b11a850a880edb833d2520396689b..5935c0379b98608f78877ffeeb312c1673a50d15 100644 (file)
--- a/basis/help/stylesheet/stylesheet.factor
+++ b/basis/help/stylesheet/stylesheet.factor
@@ -92,6 +92,7 @@ SYMBOL: code-style
 H{
     { font-name $ default-monospace-font-name }
     { font-size $ default-font-size }
+    { foreground $ text-color }
     { page-color $ code-background-color }
     { inset { 5 5 } }
     { wrap-margin f }

diff --git a/basis/ui/theme/switching/switching.factor b/basis/ui/theme/switching/switching.factor
index 40466e2636d92f57ed2ec17bed2210e68cf48c90..2ae5aa5eaa571eec97835e70c401a4457b2a32cd 100644 (file)
--- a/basis/ui/theme/switching/switching.factor
+++ b/basis/ui/theme/switching/switching.factor
@@ -32,6 +32,7 @@ t default-theme? set-global
     heading-style heading-color foreground update-style
     snippet-style snippet-color foreground update-style
     code-style code-background-color page-color update-style
+    code-style text-color foreground update-style
     output-style output-color foreground update-style
     url-style link-color foreground update-style
     warning-style warning-background-color page-color update-style