Index: openacs-4/packages/acs-tcl/tcl/test/application-data-link-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/application-data-link-procs.tcl,v
diff -u -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/acs-tcl/tcl/test/application-data-link-procs.tcl	5 Feb 2007 16:44:29 -0000	1.1.2.2
+++ openacs-4/packages/acs-tcl/tcl/test/application-data-link-procs.tcl	15 Apr 2007 20:18:43 -0000	1.1.2.3
@@ -42,7 +42,7 @@
 	    
 	    # generate some text with links between the objects
 	    foreach n [array names o] {
-		append text "\nTest Content Link to $o($n) /o/$o($n) \n"
+		append text "\nTest Content Link to $o($n) <a href=\"/o/$o($n)\">Link</a> \n"
 	    }
 	    # update the links
 	    foreach n [array names o] {