Index: openacs-4/packages/simple-survey/www/admin/description-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/description-edit-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/simple-survey/www/admin/description-edit-2.tcl 20 Apr 2001 20:51:22 -0000 1.1 +++ openacs-4/packages/simple-survey/www/admin/description-edit-2.tcl 25 Feb 2002 20:27:41 -0000 1.2 @@ -35,52 +35,24 @@ } if {$checked_p == "f"} { - set whole_page "[ad_header "Confirm Description"] - -
- - - Note: if the text above has a bunch of visible HTML tags then you probably - should have selected \"HTML\" rather than \"Plain Text\". If it is all smashed together - and you want the original line breaks saved then choose \"Preformatted Text\". - Use your browser's Back button to return to the submission form. - - - [ad_footer]" - - doc_return 200 text/html $whole_page + ad_return_template } else {" - switch $desc_html { "t" { - append whole_page "$description" } "pre" { regsub "\[ \012\015\]+\$" $description {} description set description "
[ns_quotehtml $description]" - append whole_page "$description" set desc_html "t" } default { - append whole_page "[util_convert_plaintext_to_html $description]" + set description "[util_convert_plaintext_to_html $description]" } } - append whole_page " - -