Как выход я сделал так

egr 08.05.2002 09:04

@translation[buffer]
$buffer[$buffer]
$repl[^table::create[nameless]{<	&lt^;
>	&gt^;
&	&amp^;
"	&quot^;}]
$buffer[^buffer.replace[$repl]]
$buffer[^buffer.match[\n\n][g]{<p />}]
$buffer[^buffer.match[\n][g]{<br />}]
$buffer[^taint[as-is][$buffer]]
$buffer