Index: openacs-4/packages/acs-bootstrap-installer/tcl/30-apm-load-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/30-apm-load-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-bootstrap-installer/tcl/30-apm-load-procs.tcl	10 Sep 2002 22:22:07 -0000	1.8
+++ openacs-4/packages/acs-bootstrap-installer/tcl/30-apm-load-procs.tcl	24 Sep 2002 02:42:33 -0000	1.9
@@ -275,7 +275,11 @@
             if { [llength [info procs db_release_unused_handles]] != 0 } {
                 db_release_unused_handles
             }
-        }
+        } elseif { ( [empty_string_p $file_db_type] ||
+	             [string equal $file_db_type $db_type] ) &&
+	           ( [string equal $file_type tcl_util] ) } {
+	    ns_log warning "apm_boostrap_load_file skipping $file because it isn't either a -procs.tcl or -init.tcl file"
+	}
     }
 
     unset apm_first_time_loading_p