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

Integrate the customized code with the existing examples

Browse Source
This commit is contained in:
Tessa Kelly 2022-04-12 17:28:39 -07:00
parent f4cb7fdc56
commit 56e3211efc
1 changed files with 16 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
styleguide-app/Examples/Accordion.elm
View File

@ -107,14 +107,14 @@ view ellieLinkConfig model =
, mainType = "RootHtml.Html String"
, toExampleCode =
\settings ->
[ { sectionName = "Basic example"
[ { sectionName = "Partial example"
, code =
String.join "\n"
[ "Accordion.view"
, " { entries ="
, " [ Accordion.AccordionEntry"
, " { caret = " ++ Tuple.first settings.icon
, " , content = \\()" ++ Tuple.first settings.content
, " , content = \\() -> " ++ Tuple.first settings.content
, " , entryClass = \"customizable-example\""
, " , headerContent = " ++ Tuple.first settings.headerContent
, " , headerId = \"customizable-example-header\""
@ -140,16 +140,11 @@ view ellieLinkConfig model =
, headerContent = Tuple.second settings_.headerContent
, headerId = "customizable-example-header"
, headerLevel = Accordion.H4
, isExpanded = True
, toggle = Nothing
, isExpanded = Set.member 4 model.expanded
, toggle = Just (Toggle 4)
}
[]
]
, focus = Focus
}
, Accordion.view
{ entries =
[ AccordionEntry
, AccordionEntry
{ caret = defaultCaret
, content = \_ -> Html.text "🍎 There are many kinds of apples! Apples are more genetically diverse than humans. The genetic diversity of apples means that to preserve delicious apple varieties, growers must use grafting rather than seeds. In the apple market, clones have already taken over! 🍏"
, entryClass = "accordion-example"
@ -231,17 +226,6 @@ view ellieLinkConfig model =
, toggle = Just (Toggle 2)
}
[]
, AccordionEntry
{ caret = defaultCaret
, content = \_ -> Html.text "There are many types of berries and all of them are delicious (or poisonous (or both)). Blackberries and mulberries are especially drool-worthy."
, entryClass = "accordion-example"
, headerContent = Html.text "Berries"
, headerId = "accordion-entry__4"
, headerLevel = Accordion.H5
, isExpanded = Set.member 4 model.expanded
, toggle = Just (Toggle 4)
}
[]
, AccordionEntry
{ caret =
\isOpen ->
@ -349,13 +333,13 @@ initSettings =
controlIcon : Control ( String, Bool -> Html Msg )
controlIcon =
Control.choice
[ ( "none", Control.value ( "\\_ -> text \"\"", \_ -> Html.text "" ) )
, ( "DisclosureIndicator"
[ ( "DisclosureIndicator"
, Control.value
( "DisclosureIndicator.large [ Css.marginRight (Css.px 8) ]"
, DisclosureIndicator.large [ Css.marginRight (Css.px 8) ]
)
)
, ( "none", Control.value ( "\\_ -> text \"\"", \_ -> Html.text "" ) )
, ( "UiIcon"
, Control.map
(\( code, icon ) ->
@ -371,15 +355,20 @@ controlIcon =
controlHeaderContent : Control ( String, Html Msg )
controlHeaderContent =
Control.map
(\v -> ( "text " ++ v, Html.text v ))
(Control.string "Header content")
(\v -> ( quoteF "text" v, Html.text v ))
(Control.string "Berries")
controlContent : Control ( String, Html Msg )
controlContent =
Control.map
(\v -> ( "text " ++ v, Html.text v ))
(Control.stringTextarea "Disclosable content")
(\v -> ( quoteF "text" v, Html.text v ))
(Control.stringTextarea "🍓 There are many types of berries and all of them are delicious (or poisonous (or both)). Blackberries and mulberries are especially drool-worthy.")
quoteF : String -> String -> String
quoteF f v =
f ++ " \"" ++ v ++ "\""
type Msg