Index: openacs-4/packages/rss-support/rss-support.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/rss-support.info,v
diff -u -r1.21 -r1.21.2.1
--- openacs-4/packages/rss-support/rss-support.info	9 Jul 2018 16:46:39 -0000	1.21
+++ openacs-4/packages/rss-support/rss-support.info	3 Dec 2020 12:49:10 -0000	1.21.2.1
@@ -8,7 +8,7 @@
     <singleton-p>t</singleton-p>
     <auto-mount>rss-support</auto-mount>
 
-    <version name="0.5d0" url="http://openacs.org/repository/download/apm/rss-support-0.5d0.apm">
+    <version name="0.5d1" url="http://openacs.org/repository/download/apm/rss-support-0.5d1.apm">
         <owner url="mailto:aegrumet@alum.mit.edu">Andrew Grumet</owner>
         <owner url="mailto:jerry@theashergroup.com">Jerry Asher</owner>
         <owner url="mailto:dave@thedesignexperience.org">Dave Bauer</owner>
@@ -34,14 +34,15 @@
 </description>
         <maturity>2</maturity>
 
-        <provides url="rss-support" version="0.5d0"/>
+        <provides url="rss-support" version="0.5d1"/>
 	<requires url="acs-kernel" version="5.9.1"/>
 	<requires url="acs-tcl" version="5.9.1"/>
 
         <callbacks>
         </callbacks>
         <parameters>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="RssGenOutputDirectory"  default="rss" description="The directory to which RSS files will be written, relative to the server root."/>
+            <parameter scope="global" datatype="number"  min_n_values="1"  max_n_values="1"  name="RssGenActiveP"  default="1"  description="Enable the RSS generation service (1) or not (0)."/>
         </parameters>
 
     </version>
Index: openacs-4/packages/rss-support/tcl/rss-generation-service-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/tcl/rss-generation-service-procs.tcl,v
diff -u -r1.22 -r1.22.2.1
--- openacs-4/packages/rss-support/tcl/rss-generation-service-procs.tcl	7 Aug 2017 23:48:29 -0000	1.22
+++ openacs-4/packages/rss-support/tcl/rss-generation-service-procs.tcl	3 Dec 2020 12:49:10 -0000	1.22.2.1
@@ -10,24 +10,28 @@
 
 ad_proc -private rss_gen_service {} {
 
-    ns_log Debug "rss_gen_service: starting"
+    if {[parameter::get_global_value -package_key rss-support -parameter RssGenActiveP]} {
 
-    # Bind any unbound implementations
-    rss_gen_bind
+        ns_log Debug "rss_gen_service: starting"
 
-    set n 0
+        # Bind any unbound implementations
+        rss_gen_bind
 
-    db_foreach timed_out_subscriptions {} {
-	set lastupdate [acs_sc::invoke -contract RssGenerationSubscriber -operation lastUpdated -call_args $summary_context_id -impl $impl_name]
-	if { $lastupdate > $lastbuild } {
-	    # Old report is stale.  Build a new one.
-	    rss_gen_report $subscr_id
-	    incr n
-	}
-    }
+        set n 0
 
-    ns_log Debug "rss_gen_service: built $n reports"
+        db_foreach timed_out_subscriptions {} {
+            set lastupdate [acs_sc::invoke -contract RssGenerationSubscriber -operation lastUpdated -call_args $summary_context_id -impl $impl_name]
+            if { $lastupdate > $lastbuild } {
+                # Old report is stale.  Build a new one.
+                rss_gen_report $subscr_id
+                incr n
+            }
+        }
 
+        ns_log Debug "rss_gen_service: built $n reports"
+    } {
+        ns_log Debug "rss_gen_service: disabled by RssGenActiveP global parameter"
+    }
 }
 
 ad_proc -private rss_gen_report subscr_id {