Index: openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl	15 Nov 2003 23:43:53 -0000	1.1.2.1
+++ openacs-4/packages/acs-tcl/tcl/test/html-conversion-procs.tcl	19 Dec 2003 18:26:31 -0000	1.1.2.2
@@ -49,3 +49,10 @@
     }
 }
 
+
+aa_register_case ad_html_security_check_href_allowed {
+    tests is href attribute is allowed of A tags
+} {
+    set html "<a href=\"http://www.example/com\">An Link</a>"
+    aa_true "href is allowed for A tags" [string equal [ad_html_security_check $html] ""]
+}
\ No newline at end of file