Index: openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl,v
diff -u -r1.3.2.2 -r1.3.2.3
--- openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl	22 Nov 2006 10:03:17 -0000	1.3.2.2
+++ openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl	14 Sep 2022 13:11:04 -0000	1.3.2.3
@@ -1,12 +1,12 @@
 ad_library {
-    
+
     Procs to set up the dotLRN news aggregator applet
-    
+
     @author simon@collaboraid.biz
 }
 
 namespace eval dotlrn_news_aggregator {}
-    
+
 ad_proc -public dotlrn_news_aggregator::applet_key {} {
     What's my applet key?
 } {
@@ -38,7 +38,7 @@
 }
 
 ad_proc -public dotlrn_news_aggregator::remove_applet {} {
-    One time destroy. 
+    One time destroy.
 } {
     dotlrn_applet::remove_applet_from_dotlrn -applet_key [applet_key]
 }
@@ -61,7 +61,7 @@
     news_aggregator_admin_portlet::add_self_to_page \
         -portal_id $admin_portal_id \
         -package_id $package_id
-    
+
     set args [ns_set create]
     ns_set put $args package_id $package_id
     add_portlet_helper $portal_id $args
@@ -126,8 +126,8 @@
 ad_proc -public dotlrn_news_aggregator::add_portlet {
     portal_id
 } {
-    A helper proc to add the underlying portlet to the given portal. 
-    
+    A helper proc to add the underlying portlet to the given portal.
+
     @param portal_id
 } {
     # simple, no type specific stuff, just set some dummy values
@@ -157,11 +157,11 @@
     portal_id
     args
 } {
-    A helper proc to remove the underlying portlet from the given portal. 
-    
+    A helper proc to remove the underlying portlet from the given portal.
+
     @param portal_id
     @param args A list of key-value pairs (possibly user_id, community_id, and more)
-} { 
+} {
     news_aggregator_portlet::remove_self_from_page \
         -portal_id $portal_id \
         -package_id [ns_set get $args package_id]
@@ -189,10 +189,8 @@
     event
     old_value
     new_value
-} { 
-    listens for the following events: 
-} { 
+} {
+    listens for the following events:
+} {
     # Hm. Nothing, it seems
-}   
-
-
+}