NoRedInk/noredink-ui
1
1
Fork 0
mirror of https://github.com/NoRedInk/noredink-ui.git synced 2024-12-19 11:41:32 +03:00
Code Issues Packages Projects Releases Wiki Activity

Adds code section

Browse Source
This commit is contained in:
Tessa Kelly 2022-03-23 09:00:32 -07:00
parent 866cfb88e4
commit c8d53a71c8
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
styleguide-app/Examples/Text.elm
View File

@ -11,6 +11,7 @@ import CommonControls
import Css
import Debug.Control as Control exposing (Control)
import Debug.Control.Extra as ControlExtra
import Debug.Control.View as ControlView
import Example exposing (Example)
import Html.Styled as Html exposing (Html)
import Html.Styled.Attributes exposing (css)
@ -43,8 +44,13 @@ example =
Control.currentValue state.control
in
[ Text.caption [ Text.plaintext "NOTE: When using these styles, please read the documentation in the Elm module about \"Understanding spacing\"" ]
, Control.view UpdateControl state.control
|> Html.fromUnstyled
, ControlView.view
{ update = UpdateControl
, settings = state.control
, toExampleCode =
\settings ->
[]
}
, Heading.h2 [ Heading.style Heading.Top ] [ Html.text "Paragraph styles" ]
, viewExamples
[ ( "mediumBody", Text.mediumBody )