subsite::util::packages_no_cache (private)

 subsite::util::packages_no_cache [ -node_id node_id ]

Defined in packages/acs-subsite/tcl/subsite-procs.tcl

return a list of package_id's for children of the passed node_id

Switches:

-node_id

(optional)

Author:

Jeff Davis davis@xarg.net

Created:

2004-05-07

See Also:

• subsite::util::packages

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    # need to strip nodes which have no mounted package...
    set packages [list]
    foreach package [site_node::get_children -all -node_id $node_id -element package_id] {
        if {$package ne ""} {
            lappend packages $package
        }
    }

    return $packages

XQL Not present:

Generic

PostgreSQL XQL file:

packages/acs-subsite/tcl/subsite-procs-postgresql.xql

Oracle XQL file:

packages/acs-subsite/tcl/subsite-procs-oracle.xql