diff options
| -rw-r--r-- | Omni/Jr/Web.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Omni/Jr/Web.hs b/Omni/Jr/Web.hs index 2b7ba21..2e4ee66 100644 --- a/Omni/Jr/Web.hs +++ b/Omni/Jr/Web.hs @@ -932,7 +932,10 @@ renderListGroupItem :: (Monad m) => TaskCore.Task -> Lucid.HtmlT m () renderListGroupItem t = Lucid.a_ [ Lucid.class_ "list-group-item", - Lucid.href_ ("/tasks/" <> TaskCore.taskId t) + Lucid.href_ ("/tasks/" <> TaskCore.taskId t), + Lucid.makeAttribute "hx-boost" "true", + Lucid.makeAttribute "hx-target" "body", + Lucid.makeAttribute "hx-swap" "innerHTML" ] <| do Lucid.div_ [Lucid.class_ "list-group-item-content"] <| do |