(defcomp
  (&key id name email status)
  (tr
    (~tw :tokens "border-b border-stone-100")
    (td (~tw :tokens "px-3 py-2") (input :type "checkbox" :name "ids" :value id))
    (td (~tw :tokens "px-3 py-2 text-stone-700") name)
    (td (~tw :tokens "px-3 py-2 text-stone-700") email)
    (td
      (~tw :tokens "px-3 py-2")
      (span
        :class (str
          "px-2 py-0.5 rounded text-xs font-medium "
          (if
            (= status "active")
            "bg-emerald-100 text-emerald-700"
            "bg-stone-100 text-stone-500"))
        status))))