(defcomp
  ()
  (div
    :id "ref-put-view"
    (div
      (~tw :tokens "flex items-center justify-between p-3 bg-stone-100 rounded")
      (span (~tw :tokens "text-stone-700 text-sm") "Status: " (strong "draft"))
      (button
        :sx-put "/sx/(geography.(hypermedia.(reference.(api.status))))"
        :sx-target "#ref-put-view"
        :sx-swap "innerHTML"
        :sx-vals "{\"status\": \"published\"}"
        (~tw :tokens "px-3 py-1 bg-violet-600 text-white rounded text-sm hover:bg-violet-700")
        "Publish"))))