[gimp-perl] Data::Dumper needs localised-number protection too - seems all XS do.



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]