Index: openacs-4/packages/acs-templating/resources/forms/standard.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/resources/forms/standard.adp,v diff -u -r1.28 -r1.28.2.1 --- openacs-4/packages/acs-templating/resources/forms/standard.adp 29 Jun 2015 11:03:39 -0000 1.28 +++ openacs-4/packages/acs-templating/resources/forms/standard.adp 18 Aug 2015 11:39:15 -0000 1.28.2.1 @@ -37,7 +37,7 @@ - + @@ -61,6 +61,13 @@ + + + + + + + @@ -73,7 +80,7 @@ - + @@ -90,10 +97,6 @@ - - - - Index: openacs-4/packages/acs-templating/tcl/richtext-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/richtext-procs.tcl,v diff -u -r1.52.2.1 -r1.52.2.2 --- openacs-4/packages/acs-templating/tcl/richtext-procs.tcl 14 Aug 2015 11:41:28 -0000 1.52.2.1 +++ openacs-4/packages/acs-templating/tcl/richtext-procs.tcl 18 Aug 2015 11:39:15 -0000 1.52.2.2 @@ -616,7 +616,10 @@ } set ckOptions [join $ckOptionsList ", "] - append postTextArea [subst {\n}] + append postTextArea [subst { + + }] } else { # Editor is custom. @@ -627,13 +630,12 @@ } append output \ - "\n\n" \ - [subst {}] \ - [_ acs-templating.Format] \ - ": $format_menu\n" \ - $postTextArea + [subst {[_ acs-templating.Format]: }] \ + $format_menu "\n" \ + $postTextArea "" if { $spellcheck(render_p) } { append output \ @@ -646,12 +648,16 @@ } else { # htmlarea_p is false - append output "\n[_ acs-templating.Format]: $format_menu" + append output [subst { + [_ acs-templating.Format]: $format_menu + }] if { $spellcheck(render_p) } { - append output "\n[_ acs-templating.Spellcheck]: " \ + append output [subst { + [_ acs-templating.Spellcheck]: [menu "$element(id).spellcheck" [nsv_get spellchecker lang_options] \ $spellcheck(selected_option) {}] + }] } } @@ -664,7 +670,7 @@ append output "" } } - + return $output }