From 7a08e41148d2b2488c6c260f484b523db500d1c0 Mon Sep 17 00:00:00 2001
From: Thomas Hochstein <thh@thh.name>
Date: Sat, 30 May 2026 12:48:59 +0200
Subject: [PATCH] mew: Use minimal encoding.

Signed-off-by: Thomas Hochstein <thh@thh.name>
---
 mew.pl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/mew.pl b/mew.pl
index a9a8ee4..1b9faaa 100644
--- a/mew.pl
+++ b/mew.pl
@@ -17,9 +17,10 @@ my $input = join (' ',@ARGV);
 utf8::decode($input);
 
 if ($input =~ /[\x80-\x{ffff}]/o) {
-   print encode('MIME-Q', $input);
+   $output = encode('MIME-Q', $input);
+   $output =~ s/=20/_/g;
 } else {
-   print decode('MIME-Q', $input); 
+   $output =  decode('MIME-Q', $input);
 };
 
-print "\n";
+print "$output\n";