This commit is contained in:
Tessa Kelly 2023-01-05 11:31:28 -07:00
parent abce9cd65c
commit 656ac54227
3 changed files with 4 additions and 13 deletions

View File

@ -283,6 +283,8 @@ space =
Word " "
{-| Use this helper with `content` when you need to attach an id to a particular word inside of an emphasis.
-}
wordWithId : { id : String, word : String } -> Content msg
wordWithId =
WordWithId

View File

@ -8,7 +8,7 @@ module Code exposing
, tuple
, record, recordMultiline
, newlineWithIndent, newlines
, withParens, withParensMultiline
, withParens
, anonymousFunction, always
, caseExpression
, browserElement, unstyledView
@ -27,7 +27,7 @@ module Code exposing
@docs tuple
@docs record, recordMultiline
@docs newlineWithIndent, newlines
@docs withParens, withParensMultiline
@docs withParens
@docs anonymousFunction, always
@docs caseExpression
@docs browserElement, unstyledView
@ -174,16 +174,6 @@ withParens val =
"(" ++ val ++ ")"
{-| -}
withParensMultiline : List String -> Int -> String
withParensMultiline items indent =
let
indents =
newlineWithIndent indent
in
indents ++ "(" ++ String.join indents items ++ indents ++ ")"
{-| -}
anonymousFunction : String -> String -> String
anonymousFunction vars body =

View File

@ -6,7 +6,6 @@ import Expect
import Html.Attributes as Attributes
import Html.Styled
import Nri.Ui.Block.V4 as Block
import Nri.Ui.QuestionBox.V3 as QuestionBox
import Test exposing (..)
import Test.Html.Query as Query
import Test.Html.Selector as Selector