commit 42215f91fcd402df2a67c3b5601c50f622cc0b47 from: Omar Polo date: Tue Oct 17 07:30:41 2023 UTC don't decode the whole ARGV, just the pattern for cmd_find UNICODE is subtle, better not slightly tweaks the argument unless we really need them. commit - cb8467de96056c2bef1d9ff538e01ad72bc0506c commit + 42215f91fcd402df2a67c3b5601c50f622cc0b47 blob - 70ca3e110f7197415b2c2aa8e00cda0ed878162d blob + 522ba79c1377f5a14b890b4e726180e293dd2210 --- plass +++ plass @@ -20,7 +20,7 @@ use v5.32; use open ":std", ":encoding(UTF-8)"; -use Encode::Locale qw(decode_argv); +use Encode::Locale; use Encode qw(decode); use Getopt::Long qw(:config bundling require_order); @@ -28,8 +28,6 @@ use File::Basename; use File::Find; use File::Path qw(make_path); use File::Temp qw(tempfile); - -decode_argv; my $store = $ENV{'PLASS_STORE'} // $ENV{'HOME'}.'/.password-store'; @@ -117,6 +115,8 @@ sub recipient { sub passfind { my $pattern = shift; my @entries; + + $pattern = decode(locale => $pattern) if defined $pattern; find({ wanted => sub {