Index: openacs-4/packages/acs-tcl/tcl/application-data-link-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/application-data-link-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-tcl/tcl/application-data-link-procs.xql	1 Nov 2006 19:22:51 -0000	1.4
+++ openacs-4/packages/acs-tcl/tcl/application-data-link-procs.xql	14 May 2007 20:30:26 -0000	1.5
@@ -105,5 +105,10 @@
 	and object_id_two = :to_object_id
     </querytext>
 </fullquery>
-	
+
+<fullquery name="application_data_link::scan_for_links.confirm_object_ids">
+    <querytext>
+	select object_id from acs_objects where object_id in ([template::util::tcl_to_sql_list $refs])
+    </querytext>
+</fullquery>	
 </queryset>