"; $raw=extract_field($field,$module); foreach (explode("\n", $raw) as $line) { if ($line == "") { switch ($state) { case "inpara": $state="endpara"; $result .= "
"; break; } } else if ($line[0] == " " || $line[0] == "\t") { switch ($state) { case "literal": break; case "inpara": $result .= ""; case "endpara": $result .= ""; $state = "literal"; } } else { switch ($state) { case "literal": $result .= ""; case "endpara": $result .= "
"; $state = "inpara"; } } $result .= $line . "\n"; } switch ($state) { case "literal": $result .= ""; break; case "inpara": $result .= "
"; break; } return $result; } ?>