projects
/
exim.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Reset locale after calling embedded Perl, in case it was changed.
[exim.git]
/
src
/
src
/
perl.c
diff --git
a/src/src/perl.c
b/src/src/perl.c
index 533d2c47df4aef3699ee6e8feb3444a3ac1487d7..a22fe6f401ff98d86189c0d88f614f4da92f93b8 100644
(file)
--- a/
src/src/perl.c
+++ b/
src/src/perl.c
@@
-1,4
+1,4
@@
-/* $Cambridge: exim/src/src/perl.c,v 1.
1 2004/10/07 10:39:0
1 ph10 Exp $ */
+/* $Cambridge: exim/src/src/perl.c,v 1.
2 2004/12/20 11:46:2
1 ph10 Exp $ */
/*************************************************
* Exim - an Internet mail transport agent *
/*************************************************
* Exim - an Internet mail transport agent *
@@
-167,7
+167,8
@@
call_perl_cat(uschar *yield, int *sizep, int *ptrp, uschar **errstrp,
yield = string_cat(yield, sizep, ptrp, str, (int)len);
FREETMPS;
LEAVE;
yield = string_cat(yield, sizep, ptrp, str, (int)len);
FREETMPS;
LEAVE;
-
+
+ setlocale(LC_ALL, "C"); /* In case it got changed */
return yield;
}
return yield;
}