xo::PackageMgr proc get_package_class_from_package_key (public)

 xo::PackageMgr[i] get_package_class_from_package_key package_key

Defined in packages/xotcl-core/tcl/06-package-procs.tcl

Obtain the package class from a package key

Parameters:
package_key

Partial Call Graph (max 5 caller/called nodes):
%3 test_create_form_with_form_instance create_form_with_form_instance (test xowiki) xo::PackageMgr proc get_package_class_from_package_key xo::PackageMgr proc get_package_class_from_package_key test_create_form_with_form_instance->xo::PackageMgr proc get_package_class_from_package_key test_link_tests link_tests (test xowiki) test_link_tests->xo::PackageMgr proc get_package_class_from_package_key test_package_normalize_path package_normalize_path (test xowiki) test_package_normalize_path->xo::PackageMgr proc get_package_class_from_package_key test_path_resolve path_resolve (test xowiki) test_path_resolve->xo::PackageMgr proc get_package_class_from_package_key test_xowiki_test_cases xowiki_test_cases (test xowiki) test_xowiki_test_cases->xo::PackageMgr proc get_package_class_from_package_key

Testcases:
package_normalize_path, xowiki_test_cases, link_tests, path_resolve, create_form_with_form_instance
Source code:
return [acs::per_thread_cache eval -key xotcl-core.get_package_class_from_package_key($package_key) {
  set result ""
  foreach p [::xo::PackageMgr allinstances] {
    if {[$p package_key] eq $package_key} {
      set result $p
      break
    }
  }
  set result
}]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: