add perl patch

1 files changed, 13 insertions, 0 deletions

diff --git a/perl-5.38.patch b/perl-5.38.patch
new file mode 100644
index 000000000000..948dc963e35b
--- /dev/null
+++ b/perl-5.38.patch
@@ -0,0 +1,13 @@
+diff --git a/src/rxvtperl.xs b/src/rxvtperl.xs
+index 25b1144b..f664f397 100644
+--- a/src/rxvtperl.xs
++++ b/src/rxvtperl.xs
+@@ -399,7 +399,7 @@ rxvt_perl_interp::init ()
+ {
+   if (!perl)
+     {
+-      rxvt_push_locale (""); // perl init destroys current locale
++      rxvt_push_locale ("C"); // perl init destroys current locale
+ 
+       {
+         perl_environ = rxvt_environ;