Index: openacs-4/packages/wp-slim/www/edit-presentation.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/Attic/edit-presentation.tcl,v diff -u -r1.4 -r1.4.2.1 --- openacs-4/packages/wp-slim/www/edit-presentation.tcl 6 Sep 2002 15:32:23 -0000 1.4 +++ openacs-4/packages/wp-slim/www/edit-presentation.tcl 24 Jan 2003 09:39:40 -0000 1.4.2.1 @@ -47,4 +47,10 @@ set context [list [list "presentation-top?[export_url_vars pres_item_id]" "$pres_title"] "Edit Presentation"] +# quote html tags +set page_signature [ad_quotehtml $page_signature] +set copyright_notice [ad_quotehtml $copyright_notice] +set audience [ad_quotehtml $audience] +set background [ad_quotehtml $background] + ad_return_template Index: openacs-4/packages/wp-slim/www/edit-slide.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/Attic/edit-slide.tcl,v diff -u -r1.4.2.1 -r1.4.2.2 --- openacs-4/packages/wp-slim/www/edit-slide.tcl 21 Jan 2003 12:46:48 -0000 1.4.2.1 +++ openacs-4/packages/wp-slim/www/edit-slide.tcl 24 Jan 2003 09:39:40 -0000 1.4.2.2 @@ -77,5 +77,7 @@ incr bullet_num set bullet_max [expr $bullet_num + 1] +# quote html tags contained in bullet items +set bullet_items [ad_quotehtml $bullet_items] ad_return_template