Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	30 Mar 2001 05:44:47 -0000	1.3
+++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	3 Apr 2001 04:28:59 -0000	1.4
@@ -41,6 +41,10 @@
 
 	# At this point, we should have a directory that is equivalent to a package_key.
 	if { [apm_package_installed_p $package_key] } {
+
+	    # Load up the queries (OpenACS Query Dispatcher - ben)
+	    apm_package_install_queries $package_key
+
 	    if {$new_p} {
 		continue
 	    }
@@ -295,6 +299,8 @@
     array set version [apm_read_package_info_file $spec_file_path]
     set package_key $version(package.key)
 
+    # Install Queries (OpenACS Query Dispatcher - ben)
+    apm_package_install_queries $package_key
 
     if { $copy_files_p } {
 	if { [empty_string_p $install_path] } {
@@ -745,7 +751,7 @@
     set files [glob -nocomplain ${path}/www/*.sql]
     set files [concat $files [glob -nocomplain ${path}/tcl/*.sql]]
 
-    ns_log Notice "APM/QD = loading up package query files"
+    ns_log Notice "APM/QD = loading up package query files for $package_key"
 
     foreach file $files {
 	ns_log Notice "APM/QD = one file $file"