• Publicity: Public Only All

apm-admin-procs.tcl

Definitions for the APM administration interface.

Location:
packages/acs-admin/tcl/apm-admin-procs.tcl
Created:
29 September 2000
Author:
Bryan Quinn <bquinn@arsdigita.com>
CVS Identification:
$Id: apm-admin-procs.tcl,v 1.32.2.8 2021/08/02 17:04:53 gustafn Exp $

Procedures in this file

Detailed information

apm_header (public, deprecated)

 apm_header [ -form form ] [ args... ]
Deprecated. Invoking this procedure generates a warning.

Generates HTML for the header of a page (including context bar). Must only be used for APM admin pages (under /acs-admin/apm). We are adding the APM index page to the context bar so it doesn't have to be added on each page

Switches:
-form (optional)
Author:
Peter Marklund

Partial Call Graph (max 5 caller/called nodes):
%3 _ _ (public) ad_context_bar ad_context_bar (public) ad_get_tcl_call_stack ad_get_tcl_call_stack (public) apm_header apm_header apm_header->_ apm_header->ad_context_bar apm_header->ad_get_tcl_call_stack

Testcases:
No testcase defined.

apm_higher_version_installed_p (public)

 apm_higher_version_installed_p package_key version_name
Parameters:
package_key - The package in question.
version_name - The name of the currently installed version.
Returns:
The return value of this procedure doesn't really fit with its name. What it returns is:
  • -1 if there's already a higher version of the given package installed than the version_name you gave it.
  • 0 if the same version is installed as the one you supplied.
  • 1 if the version you gave is higher than the highest version installed, or no version of this package is installed.

Partial Call Graph (max 5 caller/called nodes):
%3 test_apm_higher_version_installed_p apm_higher_version_installed_p (test acs-admin) apm_higher_version_installed_p apm_higher_version_installed_p test_apm_higher_version_installed_p->apm_higher_version_installed_p apm_highest_version_name apm_highest_version_name (public) apm_higher_version_installed_p->apm_highest_version_name apm_version_names_compare apm_version_names_compare (public) apm_higher_version_installed_p->apm_version_names_compare apm_get_package_repository apm_get_package_repository (public) apm_get_package_repository->apm_higher_version_installed_p apm_package_selection_widget apm_package_selection_widget (private) apm_package_selection_widget->apm_higher_version_installed_p packages/acs-admin/www/apm/packages-install.tcl packages/acs-admin/ www/apm/packages-install.tcl packages/acs-admin/www/apm/packages-install.tcl->apm_higher_version_installed_p

Testcases:
apm_higher_version_installed_p

apm_shell_wrap (public, deprecated)

 apm_shell_wrap cmd
Deprecated. Invoking this procedure generates a warning.

The value provided by this proc is unclear, quite hardcoded, and it is used nowhere in usptream code.

Parameters:
cmd
Returns:
a command string, wrapped it shell-style (with backslashes) in case lines get too long.

See Also:
  • many possible plain tcl idioms

Partial Call Graph (max 5 caller/called nodes):
%3 ad_get_tcl_call_stack ad_get_tcl_call_stack (public) apm_shell_wrap apm_shell_wrap apm_shell_wrap->ad_get_tcl_call_stack

Testcases:
No testcase defined.
[ show source ]