Index: openacs-4/packages/press/www/admin/preview.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/press/www/admin/preview.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/press/www/admin/preview.tcl	5 Sep 2002 13:12:13 -0000	1.2
+++ openacs-4/packages/press/www/admin/preview.tcl	26 Feb 2005 17:52:22 -0000	1.3
@@ -40,7 +40,7 @@
 } -validate {
     content_html -requires {article_abstract html_p} {
         if [string eq $html_p "t"] {
-            set complaint [ad_check_for_naughty_html $article_abstract]
+            set complaint [ad_html_security_check $article_abstract]
             if ![empty_string_p $complaint] {
                 ad_complain $complaint
             }