From 32e4427144b9d207907871b78d43f0e6cc0be4ae Mon Sep 17 00:00:00 2001
From: epg <>
Date: Sun, 4 Sep 2005 17:46:16 +0000
Subject: [PATCH] (filter_mail): Fix destruction of non-printable characters.

---
 minc | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/minc b/minc
index aab2b99..d2a85da 100755
--- a/minc
+++ b/minc
@@ -584,8 +584,9 @@ sub filter_mail {
             $saved++;
             my $from = [@{$headers{'from'}}]->[-1];
             my $subject = [@{$headers{'subject'}}]->[-1];
-            $from =~ s/[[:cntrl:]]/?/g;
-            $subject =~ s/[[:cntrl:]]/?/g;
+            for ($from, $subject) {
+                tr/\x00-\x1f\x80-\xff/ /;
+            }
             print("\r");
             print(' ' x $COLUMNS);
             printf("\r\%-${nf}s \%${nm}d \%-${nF}s \%s\n",
-- 
2.56.0