# -*- Perl -*-
$Administrator = 'postmaster@localhost';
$DaemonAddress = 'mailer-daemon@localhost';
$Stupidity{"flatten"} = 1;
$Stupidity{"NoMultipleInlines"} = 1;

sub filter {
    my($entity, $fname, $ext, $type) = @_;
    action_quarantine_entire_message("Quarantined entire message");
    action_discard();
    return action_quarantine($entity, "Quarantined");
}

sub filter_multipart {
    my($entity, $fname, $ext, $type) = @_;
    filter($entity, $fname, $ext, $type);
}

1;