From 7af28c953bc1be227f44795a204f9b0ffd9534a5 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 27 Aug 2001 19:01:04 +0000
Subject: (setlocale): do not set LC_NUMERIC

---
 perl-install/c/stuff.xs.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/c')

diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm
index 23d12a0ca..d0e5bf2a5 100644
--- a/perl-install/c/stuff.xs.pm
+++ b/perl-install/c/stuff.xs.pm
@@ -177,6 +177,7 @@ void
 setlocale()
    CODE:
    setlocale(LC_ALL, "");
+   setlocale(LC_NUMERIC, "C"); /* otherwise eval "1.5" returns 1 in fr_FR for example */
 
 char *
 bindtextdomain(domainname, dirname)
-- 
cgit v1.2.1