Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v
diff -u -r1.49 -r1.50
--- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	17 May 2003 10:04:18 -0000	1.49
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	14 Aug 2003 09:46:05 -0000	1.50
@@ -559,7 +559,8 @@
 		# File is usually of form packages/package_key
 		set file_path "[acs_root_dir]/$file"
                 switch [apm_guess_file_type "" $file] {
-                    tcl_procs { apm_source [acs_root_dir]/$file }
+                    tcl_procs -
+                    test_procs { apm_source [acs_root_dir]/$file }
                     query_file { db_qd_load_query_file [acs_root_dir]/$file }
                 }