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 -r1.4 -r1.5
--- openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl	30 Jan 2003 16:12:19 -0000	1.4
+++ openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.tcl	31 Jan 2003 08:37:39 -0000	1.5
@@ -49,10 +49,12 @@
 	return 0
     }
     set kernel_install_p [apm_package_installed_p acs-kernel] 
+    set admin_exists_p [ad_acs_administrator_exists_p]
 
-    ns_log Debug "Verifying Installation: Kernel Installed? $kernel_install_p"
+    ns_log Debug "Verifying Installation: Kernel Installed? $kernel_install_p \
+ 	    An Administrator? $admin_exists_p"
 
-    if { $kernel_install_p } {
+    if { $kernel_install_p && $admin_exists_p} {
 	return 1 
     } else {
 	ad_proc util_memoize {script {max_age ""}} {no cache} {eval $script}