[gnumeric] Tests: honour --verbose in export tests.
- From: Morten Welinder <mortenw src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gnumeric] Tests: honour --verbose in export tests.
- Date: Sat, 20 Sep 2014 18:40:40 +0000 (UTC)
commit 645feb2d2eac74d9c06e0494635b117a5068fd12
Author: Morten Welinder <terra gnome org>
Date: Sat Sep 20 14:40:18 2014 -0400
Tests: honour --verbose in export tests.
test/ChangeLog | 1 +
test/GnumericTest.pm | 24 ++++++++++++++++++------
2 files changed, 19 insertions(+), 6 deletions(-)
---
diff --git a/test/ChangeLog b/test/ChangeLog
index 9534a48..d133be9 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -2,6 +2,7 @@
* GnumericTest.pm (normalize_filter): Maintain a catalog of
standard filters.
+ (test_exporter): Honour --verbose, at least in part.
2014-09-11 Morten Welinder <terra gnome org>
diff --git a/test/GnumericTest.pm b/test/GnumericTest.pm
index c8c9cc8..703f6c2 100644
--- a/test/GnumericTest.pm
+++ b/test/GnumericTest.pm
@@ -345,18 +345,30 @@ sub test_exporter {
my $tmp1 = "$tmp.gnumeric";
&junkfile ($tmp1) unless $keep;
- $code = system ("$ssconvert '$file' '$tmp1' 2>&1 | sed -e 's/^/| /'");
- &system_failure ($ssconvert, $code) if $code;
+ {
+ my $cmd = "$ssconvert '$file' '$tmp1'";
+ print STDERR "# $cmd\n" if $verbose;
+ my $code = system ("$cmd 2>&1 | sed -e 's/^/| /'");
+ &system_failure ($ssconvert, $code) if $code;
+ }
my $tmp2 = "$tmp-new.$ext";
&junkfile ($tmp2) unless $keep;
- $code = system ("$ssconvert '$file' '$tmp2' 2>&1 | sed -e 's/^/| /'");
- &system_failure ($ssconvert, $code) if $code;
+ {
+ my $cmd = "$ssconvert '$file' '$tmp2'";
+ print STDERR "# $cmd\n" if $verbose;
+ my $code = system ("$cmd 2>&1 | sed -e 's/^/| /'");
+ &system_failure ($ssconvert, $code) if $code;
+ }
my $tmp3 = "$tmp-new.gnumeric";
&junkfile ($tmp3) unless $keep;
- $code = system ("$ssconvert '$tmp2' '$tmp3' 2>&1 | sed -e 's/^/| /'");
- &system_failure ($ssconvert, $code) if $code;
+ {
+ my $cmd = "$ssconvert '$tmp2' '$tmp3'";
+ print STDERR "# $cmd\n" if $verbose;
+ my $code = system ("$cmd 2>&1 | sed -e 's/^/| /'");
+ &system_failure ($ssconvert, $code) if $code;
+ }
my $tmp4 = "$tmp.xml";
&junkfile ($tmp4) unless $keep;
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]