On 25 Oct 1999, Eric Marsden wrote:
> Hi,
>
> Various mailing list archiving packages I have seen are able to
> colorize the quoted component of messages in HTML archives (deja.com,
> for example). Has anyone written a filter which does this?
use the following routine, call it and pass it 1 line of mail at a time.
# @ucolor=("#006600", "#660000", "#000066", "#666600",
# "#006666", "#336600", "#003366");
#
# sub colorizeline($ml) {
# $flbc = lc("$ml");
# if (($ml =~ /^\s*>/) || ($ml =~ /^\s*\>\;/)) {
# $flqut = 0;
# $flqut++ while ($ml =~ s/^\s*?\>//i);
# chomp($ml);
# $tmpml = "<font color=\"$ucolor[$flqut - 1]\"><i>";
# foreach (1..$flqut) { $tmpml .= "\> "; }
# $ml = "$tmpml$ml</i></font>\n";
# }
# return($ml);
#}
--
Eddie Dunckley - Obsidian Systems, home email (24hr delayed mail checks)
Leave voice messages at +2711-792-6500, http://www.obsidian.co.za/eddie/
Join my mission to create a virtual office -see http://demo.obsidian.co.za