help: unify code-char-style and code-style.

basis/help/markup/markup.factor

@@ -99,10 +99,8 @@ ALIAS: $slot $snippet
 
 : ($code) ( presentation quot -- )
     [
-        code-char-style get [
-            last-element off
-            [ ($code-style) ] dip with-nesting
-        ] with-style
+        last-element off
+        [ ($code-style) ] dip with-nesting
     ] ($block) ; inline
 
 : $code ( element -- )
@@ -411,11 +409,7 @@ M: f ($instance) ($link) ;
     "Notes" $heading print-element ;
 
 : ($see) ( word quot -- )
-    [
-        code-char-style get [
-            code-style get swap with-nesting
-        ] with-style
-    ] ($block) ; inline
+    [ code-style get swap with-nesting ] ($block) ; inline
 
 : $see ( element -- ) check-first [ see* ] ($see) ;
 

basis/help/stylesheet/stylesheet.factor

@@ -82,14 +82,10 @@ H{
     { foreground $ snippet-color }
 } snippet-style set-global
 
-SYMBOL: code-char-style
+SYMBOL: code-style
 H{
     { font-name $ default-monospace-font-name }
     { font-size $ default-font-size }
-} code-char-style set-global
-
-SYMBOL: code-style
-H{
     { page-color $ code-background-color }
     { inset { 5 5 } }
     { wrap-margin f }
@@ -147,6 +143,6 @@ SYMBOL: bullet
             default-style title-style
             help-path-style heading-style
             subsection-style snippet-style
-            code-char-style
+            code-style
         }
     ] dip '[ get-global [ _ + ] change-at ] with each ;