Index: openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl	1 Sep 2006 20:01:23 -0000	1.4
+++ openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl	25 Sep 2006 13:39:19 -0000	1.5
@@ -20,9 +20,9 @@
 } {
     application_data_link::new_from \
 	-object_id $this_object_id \
-	-target_object_id $target_object_id
+	-to_object_id $target_object_id
     application_data_link::new_to \
-	-object_id $this_object_id
+	-object_id $this_object_id \
         -from_object_id $target_object_id
 }
 
@@ -34,7 +34,7 @@
 
     @param object_id ID of the object that you want linked to the target
     object.
-    @param target_object_id The ID of the target object.
+    @param to_object_id The ID of the target object.
 } {
     set forward_rel_id [db_nextval acs_data_links_seq]
 
@@ -49,7 +49,7 @@
 
     @param object_id ID of the object that you want linked to the target
     object.
-    @param target_object_id The ID of the target object.
+    @param from_object_id The ID of the target object.
 } {
     set backward_rel_id [db_nextval acs_data_links_seq]