---

Class Relations

• class: ::xotcl::Object

::xotcl::Object create ::xowiki::clipboard

Methods (to be applied on the object)

• add (scripted)

  set clipboard [ad_get_client_property xowiki clipboard]
  lappend clipboard {*}$ids
  ad_set_client_property xowiki clipboard [lsort -unique $clipboard]

• clear (scripted)

  ad_set_client_property xowiki clipboard ""

• get (scripted)

  return [ad_get_client_property xowiki clipboard]

• is_empty (scripted)

  expr {[:size] < 1}

• size (scripted)

  set clipboard [ad_get_client_property xowiki clipboard]
  return [llength $clipboard]

---