Index: openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl 21 Mar 2001 00:26:19 -0000 1.3 +++ openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl 30 Jan 2003 16:12:19 -0000 1.4 @@ -49,18 +49,13 @@ return 0 } set kernel_install_p [apm_package_installed_p acs-kernel] - set admin_node_p [ad_acs_admin_node] - set admin_exists_p [ad_acs_administrator_exists_p] - ns_log Debug "Verifying Installation: Kernel Installed? $kernel_install_p \ - ACS Administration Link Id: $admin_node_p An Administrator? $admin_exists_p" + ns_log Debug "Verifying Installation: Kernel Installed? $kernel_install_p" - if { $kernel_install_p && $admin_node_p && $admin_exists_p} { + if { $kernel_install_p } { return 1 } else { ad_proc util_memoize {script {max_age ""}} {no cache} {eval $script} return 0 } } - -