--- PerMsgStatus.pm.old	2005-09-20 21:44:23.775524837 +0100
+++ PerMsgStatus.pm	2005-09-20 21:48:00.799991303 +0100
@@ -158,7 +158,8 @@
     my $needs_dnsbl_harvest_p = 1; # harvest needs to be run
 
     my $decoded = $self->get_decoded_stripped_body_text_array();
-    my $bodytext = $self->get_decoded_body_text_array();
+    # JKF Do we want to decode *all* the attachments, even binary ones?
+    my $bodytext = $self->get_decoded_body_text_array($self->{conf}->{decode_attachments});
     my $fulltext = $self->{msg}->get_pristine();
 
     my @uris = $self->get_uri_list();
