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.72 -r1.73
--- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	17 Feb 2005 15:12:35 -0000	1.72
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	24 Feb 2005 13:33:02 -0000	1.73
@@ -1163,7 +1163,9 @@
         set instance_name = :instance_name
         where package_id = :package_id
     }
-    site_nodes_sync
+    foreach node_id [db_list nodes_to_sync {}] {
+        site_node::update_cache -node_id $node_id
+    }
 }
 
 ad_proc -public apm_set_callback_proc {