Index: openacs-4/packages/acs-admin/www/apm/packages-install.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/packages-install.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/acs-admin/www/apm/packages-install.tcl 1 Jul 2002 11:14:31 -0000 1.11 +++ openacs-4/packages/acs-admin/www/apm/packages-install.tcl 14 Aug 2002 18:51:13 -0000 1.12 @@ -53,7 +53,7 @@ } } -ns_log Debug $spec_files +apm_log APMDebug $spec_files ns_write "Done.

" @@ -115,7 +115,7 @@ set errors [list] set pkg_info_list [list] set pkg_key_list [list] - ns_log Debug "APM: Specification files available: $spec_files" + apm_log APMDebug "APM: Specification files available: $spec_files" foreach spec_file $spec_files { ### Parse the package. if { [catch { @@ -124,7 +124,7 @@ lappend errors "

  • Unable to parse $spec_file. The following error was generated:
    [ad_quotehtml $errmsg]

    " } else { - ns_log Debug "APM: Adding $package(package.key) to list for installation." + apm_log APMDebug "APM: Adding $package(package.key) to list for installation." lappend pkg_info_list [pkg_info_new $package(package.key) $spec_file \ $package(provides) $package(requires) ""] lappend pkg_key_list $package(package.key) @@ -170,4 +170,4 @@ ns_write " [ad_footer] -" \ No newline at end of file +"