From a85252732b6dd7d87eb9819b5149c94f15952dc5 Mon Sep 17 00:00:00 2001
From: Thomas Hochstein <thh@thh.name>
Date: Sat, 30 May 2026 12:07:58 +0200
Subject: [PATCH] mew: Fix encoding.

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

diff --git a/mew.pl b/mew.pl
index 9cee2f6..a9a8ee4 100644
--- a/mew.pl
+++ b/mew.pl
@@ -8,11 +8,13 @@
 # Copyright (c) 2023 Thomas Hochstein <thh@thh.name>
 
 use utf8;
+use open qw(:std :encoding(UTF-8));
 use Encode;
 use MIME::QuotedPrint;
 use MIME::Base64;
 
 my $input = join (' ',@ARGV);
+utf8::decode($input);
 
 if ($input =~ /[\x80-\x{ffff}]/o) {
    print encode('MIME-Q', $input);