32 lines
501 B
Elm
32 lines
501 B
Elm
-- this is a list of common styled elements
|
|
|
|
|
|
module CommonElements exposing (..)
|
|
|
|
import Element exposing (..)
|
|
import Element.Font as Font
|
|
|
|
|
|
bolded : String -> Element msg
|
|
bolded content =
|
|
el
|
|
[ Font.bold ]
|
|
(text content)
|
|
|
|
|
|
namedLink : String -> String -> Element msg
|
|
namedLink path name =
|
|
link []
|
|
{ url = "/#" ++ path
|
|
, label = text name
|
|
}
|
|
|
|
|
|
debugLog : a -> a
|
|
debugLog value =
|
|
let
|
|
_ =
|
|
Debug.log "value: " value
|
|
in
|
|
value
|