diff --git a/ui/src/ui/components/tailwind/list/ListRow.scala b/ui/src/ui/components/tailwind/list/ListRow.scala
index e5236a2..efe11fa 100644
--- a/ui/src/ui/components/tailwind/list/ListRow.scala
+++ b/ui/src/ui/components/tailwind/list/ListRow.scala
@@ -3,6 +3,7 @@
 
 import com.raquo.laminar.api.L.{*, given}
 import org.scalajs.dom
+import com.raquo.laminar.builders.HtmlTag
 
 object ListRow:
   case class ViewModel(
@@ -11,37 +12,43 @@
       bottomLeft: Modifier[HtmlElement],
       bottomRight: Modifier[HtmlElement],
       farRight: Modifier[HtmlElement],
-      containerElement: HtmlElement = div()
+      linkMods: Option[Modifier[Anchor]] = None
   )
 
+  def content(m: ViewModel): Modifier[HtmlElement] =
+    Seq(
+      cls := "block hover:bg-gray-50",
+      div(
+        cls := "px-4 py-4 sm:px-6 items-center flex",
+        div(
+          cls := "min-w-0 flex-1 pr-4",
+          div(
+            cls := "flex items-center justify-between",
+            p(
+              cls := "text-sm font-medium text-indigo-600 truncate",
+              m.title
+            ),
+            div(
+              cls := "ml-2 flex-shrink-0 flex",
+              m.topRight
+            )
+          ),
+          div(
+            cls := "mt-2 sm:flex sm:justify-between",
+            m.bottomLeft,
+            m.bottomRight
+          )
+        ),
+        m.farRight
+      )
+    )
+
   def apply($m: Signal[ViewModel]): HtmlElement =
     li(
-      child <-- $m.map(m =>
-        m.containerElement.amend(
-          cls := "block hover:bg-gray-50",
-          div(
-            cls := "px-4 py-4 sm:px-6 items-center flex",
-            div(
-              cls := "min-w-0 flex-1 pr-4",
-              div(
-                cls := "flex items-center justify-between",
-                p(
-                  cls := "text-sm font-medium text-indigo-600 truncate",
-                  m.title
-                ),
-                div(
-                  cls := "ml-2 flex-shrink-0 flex",
-                  m.topRight
-                )
-              ),
-              div(
-                cls := "mt-2 sm:flex sm:justify-between",
-                m.bottomLeft,
-                m.bottomRight
-              )
-            ),
-            m.farRight
-          )
-        )
-      )
+      child <-- $m.map { m =>
+        val c = content(m)
+        m.linkMods match
+          case Some(m) => a(m, c)
+          case _       => div(c)
+      }
     )