[gimp-perl] Data::Dumper needs localised-number protection too - seems all XS do.
- From: Ed J <edj src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp-perl] Data::Dumper needs localised-number protection too - seems all XS do.
- Date: Mon, 9 Jun 2014 03:04:40 +0000 (UTC)
commit ef8dc31d2749ce301bc1271a118e400ece55ceef
Author: Ed J <edj src gnome org>
Date: Mon Jun 9 03:56:49 2014 +0100
Data::Dumper needs localised-number protection too - seems all XS do.
Gimp/Data.pm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/Gimp/Data.pm b/Gimp/Data.pm
index eee6d22..b547d59 100644
--- a/Gimp/Data.pm
+++ b/Gimp/Data.pm
@@ -7,8 +7,8 @@ use POSIX qw(locale_h);
sub freeze($) {
my $data = shift;
return $data unless ref $data or _looks_frozen($data);
- require Data::Dumper;
my $locale = setlocale(LC_NUMERIC); setlocale(LC_NUMERIC, "C");
+ require Data::Dumper;
$data = Data::Dumper->new([$data]);
$data->Purity(1)->Terse(0);
my $frozen = $data->Dump;
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]