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

Adds button to clear all existing highlights

Browse Source
This commit is contained in:
Tessa Kelly 2022-09-13 13:28:15 -06:00
parent 1b9cddaf57
commit 52af96526c
2 changed files with 18 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Nri/Ui/Highlighter/V1.elm
View File

@ -404,9 +404,9 @@ performAction action model =
{-| -}
removeHighlights : List (Highlightable marker) -> List (Highlightable marker)
removeHighlights =
Internal.removeHighlights
removeHighlights : Model marker -> Model marker
removeHighlights model =
{ model | highlightables = Internal.removeHighlights model.highlightables }

15
styleguide-app/Examples/Highlighter.elm
View File

@ -16,11 +16,13 @@ import Debug.Control.View as ControlView
import Example exposing (Example)
import Examples.Colors
import Html.Styled exposing (..)
import Nri.Ui.Button.V10 as Button
import Nri.Ui.Colors.V1 as Colors
import Nri.Ui.Heading.V3 as Heading
import Nri.Ui.Highlightable.V1 as Highlightable exposing (Highlightable)
import Nri.Ui.Highlighter.V1 as Highlighter
import Nri.Ui.HighlighterTool.V1 as Tool
import Nri.Ui.Spacing.V1 as Spacing
import Nri.Ui.Table.V6 as Table
@ -58,8 +60,15 @@ example =
, toExampleCode = \_ -> []
}
, Heading.h2 [ Heading.plaintext "Example" ]
, Button.button "Clear all highlights"
[ Button.onClick ClearHighlights
, Button.secondary
, Button.small
, Button.css [ Css.marginTop (Css.px 10) ]
]
, Highlighter.view state.highlighter
|> map HighlighterMsg
, Heading.h2 [ Heading.plaintext "Non-interactive Examples" ]
, Table.view
[ Table.string
{ header = "Description"
@ -275,6 +284,7 @@ backgroundHighlightColors rotateWith =
type Msg
= UpdateControls (Control Settings)
| HighlighterMsg (Highlighter.Msg ())
| ClearHighlights
{-| -}
@ -297,3 +307,8 @@ update msg state =
( { state | highlighter = newHighlighter }
, Cmd.none
)
ClearHighlights ->
( { state | highlighter = Highlighter.removeHighlights state.highlighter }
, Cmd.none
)