xotcl.wu-wien.ac.at
Begin main content
Methods: Source: Variables:
[All Methods | Documented Methods | Hide Methods] [Display Source | Hide Source] [Show Variables | Hide Variables]

::xotcl::Object[i] ::xowiki::clipboard

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

Methods

  • proc add

    ::cr_folder-100 proc add ids {
        set clipboard [ad_get_client_property xowiki clipboard]
        eval lappend clipboard $ids
        ad_set_client_property xowiki clipboard [lsort -unique $clipboard]
      }
    
  • proc clear

    ::cr_folder-100 proc clear {} {
        ad_set_client_property xowiki clipboard ""
      }
    
  • proc get

    ::cr_folder-100 proc get {} {
        return [ad_get_client_property xowiki clipboard]
      }
    
  • proc is_empty

    ::cr_folder-100 proc is_empty {} {
        expr {[my size] < 1}
      }
    
  • proc size

    ::cr_folder-100 proc size {} {
        set clipboard [ad_get_client_property xowiki clipboard]
        return [llength $clipboard]
      }
    

Methods: Source: Variables:
[All Methods | Documented Methods | Hide Methods] [Display Source | Hide Source] [Show Variables | Hide Variables]