[gnumeric] Tests: use right perl.



commit 75506b07e2ff0f2548908caa6dc11d256494c7f6
Author: Morten Welinder <terra gnome org>
Date:   Wed Feb 19 18:47:09 2014 -0500

    Tests: use right perl.

 test/t6500-strings.pl |    4 ++--
 test/t6501-numbers.pl |    4 ++--
 test/t6502-styles.pl  |    4 ++--
 3 files changed, 6 insertions(+), 6 deletions(-)
---
diff --git a/test/t6500-strings.pl b/test/t6500-strings.pl
index f4cfc78..ebc0150 100755
--- a/test/t6500-strings.pl
+++ b/test/t6500-strings.pl
@@ -16,9 +16,9 @@ my $file = "$samples/string-tests.gnumeric";
 &test_roundtrip ($file,
                 'format' => 'Gnumeric_OpenCalc:odf',
                 'ext' => "ods",
-                'filter2' => "perl -p -e '\$_ = \"\" if m{<meta:generator>}'");
+                'filter2' => "$PERL -p -e '\$_ = \"\" if m{<meta:generator>}'");
 
-my $xls_filter = "perl -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
+my $xls_filter = "$PERL -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
 
 &message ("Check string xls/BIFF7 roundtrip.");
 &test_roundtrip ($file,
diff --git a/test/t6501-numbers.pl b/test/t6501-numbers.pl
index b21c855..dccbcfc 100755
--- a/test/t6501-numbers.pl
+++ b/test/t6501-numbers.pl
@@ -19,9 +19,9 @@ my $file = "$samples/number-tests.gnumeric";
 &test_roundtrip ($file,
                 'format' => 'Gnumeric_OpenCalc:odf',
                 'ext' => "ods",
-                'filter2' => "perl -p -e '\$_ = \"\" if m{<meta:generator>}'");
+                'filter2' => "$PERL -p -e '\$_ = \"\" if m{<meta:generator>}'");
 
-my $xls_filter = "perl -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
+my $xls_filter = "$PERL -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
 
 &message ("Check number xls/BIFF7 roundtrip.");
 &test_roundtrip ($file,
diff --git a/test/t6502-styles.pl b/test/t6502-styles.pl
index bef6b2d..7a330d3 100755
--- a/test/t6502-styles.pl
+++ b/test/t6502-styles.pl
@@ -16,9 +16,9 @@ my $file = "$samples/style-tests.gnumeric";
 &test_roundtrip ($file,
                 'format' => 'Gnumeric_OpenCalc:odf',
                 'ext' => "ods",
-                'filter2' => "perl -p -e '\$_ = \"\" if m{<meta:generator>}'");
+                'filter2' => "$PERL -p -e '\$_ = \"\" if m{<meta:generator>}'");
 
-my $xls_filter = "perl -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
+my $xls_filter = "$PERL -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
 
 &message ("Check style xls/BIFF7 roundtrip.");
 &test_roundtrip ($file,


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]