Usermin problem with quoted-printable email

The built in quoted_decode() isn't properly decoding my HTML-only emails... The Content-Transfer-Encoding is "quoted-printable" and it does remove some "=20" strings, but there are still a lot of "=" strings, which even breaks hyperlinks in the email. I changed /usr/share/usermin/mailbox/boxes-lib.pl to use MIME::QuotedPrint; and decode_qp() and it works great. Please consider updating quoted_decode() or using decode_qp() from MIM::QuotedPrint.


diff -u mailbox/boxes-lib.pl.original mailbox/boxes-lib.pl
--- mailbox/boxes-lib.pl.original 2008-07-28 18:57:38.000000000 -0500
+++ mailbox/boxes-lib.pl 2008-07-28 19:06:26.000000000 -0500
@@ -634,7 +634,8 @@
}
elsif (lc($_[0]->{'header'}->{'content-transfer-encoding'}) eq
'quoted-printable') {
- $body = &quoted_decode($_[0]->{'body'});
+ use MIME::QuotedPrint;
+ $body = &decode_qp($_[0]->{'body'});
}
else {
$body = $_[0]->{'body'};