Index: openacs-4/packages/cms/tcl/rel-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/rel-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/cms/tcl/rel-procs.tcl	11 Aug 2001 17:40:26 -0000	1.2
+++ openacs-4/packages/cms/tcl/rel-procs.tcl	20 Aug 2001 04:35:42 -0000	1.3
@@ -6,18 +6,21 @@
 namespace eval cms_rel {}
 
 
-# @public sort_related_item_order
 
-# Resort the related items order for a given content item, ensuring that
-#  order_n is unique for an item_id.  Chooses new order based on the old
-#  order_n and then rel_id (the order the item was related)
+ad_proc -public cms_rel::sort_related_item_order { item_id } {
 
-# @author Michael Pih
+ @public sort_related_item_order
 
-# @param item_id The item for which to resort related items
+ Resort the related items order for a given content item, ensuring that
+  order_n is unique for an item_id.  Chooses new order based on the old
+  order_n and then rel_id (the order the item was related)
 
-ad_proc cms_rel::sort_related_item_order { item_id } {
+ @author Michael Pih
 
+ @param item_id The item for which to resort related items
+
+} {
+
     db_transaction {
 
 	# grab all related items ordered by order_n, rel_id
@@ -48,18 +51,19 @@
 }
 
 
+ad_proc -public cms_rel::sort_child_item_order { item_id } {
 
-# @public sort_child_item_order
+ @public sort_child_item_order
 
-# Resort the child items order for a given content item, ensuring that
-#  order_n is unique for an item_id.  Chooses new order based on the old
-#  order_n and then rel_id (the order the item was related)
+ Resort the child items order for a given content item, ensuring that
+  order_n is unique for an item_id.  Chooses new order based on the old
+  order_n and then rel_id (the order the item was related)
 
-# @author Michael Pih
+ @author Michael Pih
 
-# @param item_id The item for which to resort child items
+ @param item_id The item for which to resort child items
 
-ad_proc cms_rel::sort_child_item_order { item_id } {
+} {
 
     db_transaction {