help.markup: change default-style to use with-nesting.
parent
ef23d9ed55
commit
476389ffc4
|
@ -49,9 +49,7 @@ M: f print-element drop ;
|
|||
[ print-element ] with-style ;
|
||||
|
||||
: with-default-style ( quot -- )
|
||||
default-span-style get [
|
||||
default-block-style get swap with-nesting
|
||||
] with-style ; inline
|
||||
default-style get swap with-nesting ; inline
|
||||
|
||||
: print-content ( element -- )
|
||||
[ print-element ] with-default-style ;
|
||||
|
|
|
@ -22,18 +22,14 @@ IN: help.stylesheet
|
|||
: font-size-span ( -- n )
|
||||
13/12 default-font-size * >integer ;
|
||||
|
||||
SYMBOL: default-span-style
|
||||
SYMBOL: default-style
|
||||
H{
|
||||
{ font-name $ default-sans-serif-font-name }
|
||||
{ font-size $ font-size-span }
|
||||
{ foreground $ text-color }
|
||||
{ font-style plain }
|
||||
} default-span-style set-global
|
||||
|
||||
SYMBOL: default-block-style
|
||||
H{
|
||||
{ wrap-margin $ wrap-margin-full }
|
||||
} default-block-style set-global
|
||||
} default-style set-global
|
||||
|
||||
SYMBOL: link-style
|
||||
H{
|
||||
|
@ -148,7 +144,7 @@ SYMBOL: bullet
|
|||
[
|
||||
font-size
|
||||
{
|
||||
default-span-style title-style
|
||||
default-style title-style
|
||||
help-path-style heading-style
|
||||
subsection-style snippet-style
|
||||
code-char-style
|
||||
|
|
|
@ -16,7 +16,7 @@ IN: ui.theme.switching
|
|||
content-background default-font-background-color set-global
|
||||
|
||||
! help.stylesheet
|
||||
default-span-style text-color foreground update-style
|
||||
default-style text-color foreground update-style
|
||||
link-style link-color foreground update-style
|
||||
title-style title-color foreground update-style
|
||||
help-path-style help-path-border-color table-border update-style
|
||||
|
|
Loading…
Reference in New Issue