xo::PackageMgr instproc instances (public)

 <instance of xo::PackageMgr> instances \
    [ -include_unmounted include_unmounted ] [ -closure closure ]

Defined in /var/www/openacs.org/packages/xotcl-core/tcl/06-package-procs.tcl

Switches:

-include_unmounted (optional, defaults to "false")

include unmounted package instances

-closure (optional, defaults to "false")

include instances of subclasses of the package

Returns:

list of package_ids of xowiki instances

Testcases:

No testcase defined.

Source code:

set package_key ${:package_key}
if {$include_unmounted} {
  set result [::xo::dc list get_xowiki_packages {select package_id  from apm_packages where package_key = :package_key}]
} else {
  set result [::xo::dc list get_mounted_packages {select package_id  from apm_packages p, site_nodes s  where package_key = :package_key  and s.object_id = p.package_id}]
}
if {$closure} {
  foreach subclass [:info subclass] {
    foreach id [$subclass instances -include_unmounted $include_unmounted -closure true] {
      lappend result $id
    }
  }
}
return [lsort -integer $result]

XQL Not present:

Generic, PostgreSQL, Oracle