Index: openacs-4/packages/static-pages/tcl/static-pages-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-init.tcl,v
diff -u -N -r1.2 -r1.2.4.1
--- openacs-4/packages/static-pages/tcl/static-pages-init.tcl	15 Dec 2001 01:39:01 -0000	1.2
+++ openacs-4/packages/static-pages/tcl/static-pages-init.tcl	12 Dec 2002 01:32:48 -0000	1.2.4.1
@@ -9,5 +9,17 @@
     nsv_set static_pages package_id [apm_package_id_from_key static-pages]
 }
 
+
+# Use these to insure that only 1 copy of sp_sync_cr_with_filesystem
+# per Static Pages package instance ever runs at once.  For each
+# package_id in the array, empty string means not running, a string
+# means is curretnly running, and the string will give the time the
+# proc started running:
+
+ns_share -init { array set sp_sync_cr_with_filesystem_times {} } sp_sync_cr_with_filesystem_times
+
+ns_share -init { set sp_sync_cr_with_filesystem_mutex [ns_mutex create] } sp_sync_cr_with_filesystem_mutex
+
+
+
 ns_log notice "static-pages-init.tcl loaded"
-    
\ No newline at end of file