Merge pull request #1510 from ailin-nemui/perl-again

restore locale if perl breaks it

(cherry picked from commit 504fd7bc60)
This commit is contained in:
ailin-nemui 2024-01-27 17:42:42 +00:00 committed by Ailin Nemui
commit adad0a2fa4
2 changed files with 21 additions and 11 deletions

View file

@ -52,10 +52,3 @@ sub eval_file {
die "cap_sasl has been unloaded from Irssi ".Irssi::version()." because it conflicts with the built-in SASL support. See /help network for configuring SASL or read the ChangeLog for more information.";
}
}
if ( $] >= 5.037005 && $] <= 5.038000 ) {
# https://github.com/Perl/perl5/issues/21366
print STDERR "\e7 \e[A Irssi: applying locale workaround for Perl 5.38.0 \e8";
require POSIX;
POSIX::setlocale(&POSIX::LC_ALL, "");
}