Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.318 -r1.319 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 19 Jan 2009 08:18:22 -0000 1.318 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 19 Jan 2009 08:51:05 -0000 1.319 @@ -1240,7 +1240,7 @@ set content [ad_enhanced_text_to_html $content] } if {![my do_substitutions]} {return $content} - set content "" + set output "" set l "" foreach l0 [split $content \n] { append l [string map $markupmap(escape) $l0] @@ -1251,11 +1251,11 @@ #regsub -all $RE(clean) $l {\1} l regsub -all $RE(clean2) $l { \1} l set l [string map $markupmap(unescape) $l] - append content $l \n + append output $l \n set l "" } - #my log "--substitute_markup returns $content" - return $content + #my log "--substitute_markup returns $output" + return $output }