Index: openacs-4/packages/acs-admin/www/apm/version-files.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-files.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-admin/www/apm/version-files.tcl 25 Feb 2003 17:10:05 -0000 1.9
+++ openacs-4/packages/acs-admin/www/apm/version-files.tcl 2 Apr 2003 15:58:18 -0000 1.10
@@ -75,8 +75,9 @@
| "
if { $installed_p == "t" } {
- if { $file_type == "tcl_procs" || ($file_type == "query_file" && [db_compatible_rdbms_p $db_type]) } {
- if { [nsv_exists apm_reload_watch "packages/$package_key/$path"] } {
+ set server_rel_path "packages/$package_key/$path"
+ if { [apm_file_watchable_p $server_rel_path] } {
+ if { [nsv_exists apm_reload_watch $server_rel_path] } {
# This procs file is already being watched.
doc_body_append " watch | "
} else {