From 59e53d73ab70330dfa802657691e72f7bbafb823 Mon Sep 17 00:00:00 2001 From: jacksonneal Date: Wed, 24 Apr 2024 18:20:36 -0400 Subject: [PATCH 1/2] add dialog element --- lucid2/CHANGELOG.md | 4 ++++ lucid2/lucid2.cabal | 2 +- lucid2/src/Lucid/Html5.hs | 4 ++++ 3 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lucid2/CHANGELOG.md b/lucid2/CHANGELOG.md index b931276..e205b85 100644 --- a/lucid2/CHANGELOG.md +++ b/lucid2/CHANGELOG.md @@ -1,3 +1,7 @@ +## 0.0.20240424 + +* Add `dialogue_` element. + ## 0.0.20230706 * Inline the `blaze-builder` modules in-use into the package, to drop diff --git a/lucid2/lucid2.cabal b/lucid2/lucid2.cabal index 31bc0c7..377c269 100644 --- a/lucid2/lucid2.cabal +++ b/lucid2/lucid2.cabal @@ -1,5 +1,5 @@ name: lucid2 -version: 0.0.20230706 +version: 0.0.20240424 synopsis: Clear to write, read and edit DSL for HTML description: Clear to write, read and edit DSL for HTML. diff --git a/lucid2/src/Lucid/Html5.hs b/lucid2/src/Lucid/Html5.hs index d6540f3..2626bd5 100644 --- a/lucid2/src/Lucid/Html5.hs +++ b/lucid2/src/Lucid/Html5.hs @@ -130,6 +130,10 @@ details_ = term "details" dfn_ :: Term arg result => arg -> result dfn_ = term "dfn" +-- | @dialog@ element +dialog_ :: Term arg result => arg -> result +dialog_ = term "dialog" + -- | @div@ element div_ :: Term arg result => arg -> result div_ = term "div" From f0b01cbf0e4d8a6c924e3b9c8a6ff6310333109b Mon Sep 17 00:00:00 2001 From: jacksonneal Date: Thu, 25 Apr 2024 18:54:27 -0400 Subject: [PATCH 2/2] changelog typo --- lucid2/CHANGELOG.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lucid2/CHANGELOG.md b/lucid2/CHANGELOG.md index e205b85..f13342b 100644 --- a/lucid2/CHANGELOG.md +++ b/lucid2/CHANGELOG.md @@ -1,6 +1,6 @@ ## 0.0.20240424 -* Add `dialogue_` element. +* Add `dialog_` element. ## 0.0.20230706