sub textToHtml
{
    $html = shift;
    $arg1 = shift;
    my( @rValue ) = ();

    $html =~ s/ /\&nbsp;/gsi;
    $html =~ s/\</\&lt;/gsi;
    $html =~ s/\>/\&gt\;/gsi;
    $html =~ s/\n/<br>/gsi;

    if( $arg1 =~ /fixed/ )
    {     
	$html = "<tt>" . $html . "</tt>";       
    }

    push @rValue, { 'output' => $html };

    return @rValue; 
}

return 1;

