Hello community,
here is the log from the commit of package perl-Test-Compile for
openSUSE:Factory checked in at 2020-03-30 23:06:31
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Test-Compile (Old)
and /work/SRC/openSUSE:Factory/.perl-Test-Compile.new.3160 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-Compile"
Mon Mar 30 23:06:31 2020 rev:11 rq:789817 version:2.4.0
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Test-Compile/perl-Test-Compile.changes
2019-11-11 13:00:40.421708321 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Test-Compile.new.3160/perl-Test-Compile.changes
2020-03-30 23:06:40.924288582 +0200
@@ -1,0 +2,10 @@
+Sun Mar 29 03:13:24 UTC 2020 - <[email protected]>
+
+- updated to 2.4.0
+ see /usr/share/doc/packages/perl-Test-Compile/Changes
+
+ v2.4.0 2020-03-29
+ - RT-132153: Be more verbose when in verbose mode
+ - Update copyright
+
+-------------------------------------------------------------------
Old:
----
Test-Compile-v2.3.1.tar.gz
New:
----
Test-Compile-v2.4.0.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Test-Compile.spec ++++++
--- /var/tmp/diff_new_pack.kT5Biw/_old 2020-03-30 23:06:42.160289287 +0200
+++ /var/tmp/diff_new_pack.kT5Biw/_new 2020-03-30 23:06:42.168289292 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Test-Compile
#
-# Copyright (c) 2019 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2020 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,7 +17,7 @@
Name: perl-Test-Compile
-Version: 2.3.1
+Version: 2.4.0
Release: 0
%define cpan_name Test-Compile
Summary: Check whether Perl files compile correctly
++++++ Test-Compile-v2.3.1.tar.gz -> Test-Compile-v2.4.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/Changes
new/Test-Compile-v2.4.0/Changes
--- old/Test-Compile-v2.3.1/Changes 2019-10-23 05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/Changes 2020-03-29 01:46:20.000000000 +0100
@@ -1,5 +1,9 @@
Revision history for Perl extension Test-Compile
+v2.4.0 2020-03-29
+ - RT-132153: Be more verbose when in verbose mode
+ - Update copyright
+
v2.3.1 2019-10-23
- RT-130694: all_pm_files_ok and all_pl_files_ok should return true/false
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/META.json
new/Test-Compile-v2.4.0/META.json
--- old/Test-Compile-v2.3.1/META.json 2019-10-23 05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/META.json 2020-03-29 01:46:20.000000000 +0100
@@ -35,11 +35,11 @@
"provides" : {
"Test::Compile" : {
"file" : "lib/Test/Compile.pm",
- "version" : "v2.3.1"
+ "version" : "v2.4.0"
},
"Test::Compile::Internal" : {
"file" : "lib/Test/Compile/Internal.pm",
- "version" : "v2.3.1"
+ "version" : "v2.4.0"
}
},
"release_status" : "stable",
@@ -51,6 +51,6 @@
"url" : "http://github.com/egiles/test-compile";
}
},
- "version" : "v2.3.1",
+ "version" : "v2.4.0",
"x_serialization_backend" : "JSON::PP version 2.97001"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/META.yml
new/Test-Compile-v2.4.0/META.yml
--- old/Test-Compile-v2.3.1/META.yml 2019-10-23 05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/META.yml 2020-03-29 01:46:20.000000000 +0100
@@ -15,10 +15,10 @@
provides:
Test::Compile:
file: lib/Test/Compile.pm
- version: v2.3.1
+ version: v2.4.0
Test::Compile::Internal:
file: lib/Test/Compile/Internal.pm
- version: v2.3.1
+ version: v2.4.0
recommends:
Devel::CheckOS: '0'
requires:
@@ -30,5 +30,5 @@
resources:
license: http://dev.perl.org/licenses/
repository: http://github.com/egiles/test-compile
-version: v2.3.1
+version: v2.4.0
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/README
new/Test-Compile-v2.4.0/README
--- old/Test-Compile-v2.3.1/README 2019-10-23 05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/README 2020-03-29 01:46:20.000000000 +0100
@@ -20,7 +20,7 @@
./Build install
COPYRIGHT AND LICENSE
- Copyright 2007-2019.
+ Copyright 2007-2020.
This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/lib/Test/Compile/Internal.pm
new/Test-Compile-v2.4.0/lib/Test/Compile/Internal.pm
--- old/Test-Compile-v2.3.1/lib/Test/Compile/Internal.pm 2019-10-23
05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/lib/Test/Compile/Internal.pm 2020-03-29
01:46:20.000000000 +0100
@@ -3,7 +3,7 @@
use warnings;
use strict;
-use version; our $VERSION = qv("v2.3.1");
+use version; our $VERSION = qv("v2.4.0");
use File::Spec;
use UNIVERSAL::require;
use Test::Builder;
@@ -373,6 +373,9 @@
my @inc = ('blib/lib', @INC);
my $taint = $self->_is_in_taint_mode($file);
my $command = join(" ", ($^X, (map { "-I$_" } @inc), "-c$taint", $file));
+ if ( $self->verbose() ) {
+ $self->{test}->diag("Executing: " . $command);
+ }
my ($compiles, $output) = $self->_run_command($command);
if ( $output && (!defined($self->verbose()) || $self->verbose() != 0) ) {
if ( !$compiles || $self->verbose() ) {
@@ -431,7 +434,7 @@
=head1 COPYRIGHT AND LICENSE
-Copyright 2007-2019 by the authors.
+Copyright 2007-2020 by the authors.
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/lib/Test/Compile.pm
new/Test-Compile-v2.4.0/lib/Test/Compile.pm
--- old/Test-Compile-v2.3.1/lib/Test/Compile.pm 2019-10-23 05:21:42.000000000
+0200
+++ new/Test-Compile-v2.4.0/lib/Test/Compile.pm 2020-03-29 01:46:20.000000000
+0100
@@ -3,7 +3,7 @@
use warnings;
use strict;
-use version; our $VERSION = qv("v2.3.1");
+use version; our $VERSION = qv("v2.4.0");
use parent 'Exporter';
use UNIVERSAL::require;
use Test::Compile::Internal;
@@ -315,7 +315,7 @@
=head1 COPYRIGHT AND LICENSE
-Copyright 2007-2019 by the authors.
+Copyright 2007-2020 by the authors.
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Compile-v2.3.1/t/100-internal-verbose.t
new/Test-Compile-v2.4.0/t/100-internal-verbose.t
--- old/Test-Compile-v2.3.1/t/100-internal-verbose.t 2019-10-23
05:21:42.000000000 +0200
+++ new/Test-Compile-v2.4.0/t/100-internal-verbose.t 2020-03-29
01:46:20.000000000 +0100
@@ -55,26 +55,42 @@
# Test that the verbosity setting is honoured
my $tests = [
- ['default', 'success', 'no output'],
- ['default', 'failure', 'output'],
- ['silent', 'success', 'no output'],
- ['silent', 'failure', 'no output'],
- ['verbose', 'success', 'output'],
- ['verbose', 'failure', 'output'],
+ # verbosity, script, expect_output, expect_executing
+ ['default', 'success', 'no output', 0],
+ ['default', 'failure', 'output', 0],
+ ['silent', 'success', 'no output', 0],
+ ['silent', 'failure', 'no output', 0],
+ ['verbose', 'success', 'output', 1],
+ ['verbose', 'failure', 'output', 1],
];
local $ENV{PERL5LIB} = join(":",@INC);
for my $test ( @$tests ) {
- my $cmd = "$^X $0 $test->[0] $test->[1]";
- my $output = `$cmd 2>&1`;
- my $name = "verbose: $test->[0], script: $test->[1], should produce:
$test->[2]";
- if ( $test->[2] eq "output" ) {
- isnt($output, "", $name);
+ # Given
+ my ($verbosity, $script, $expect_output, $expect_executing) = @$test;
+ my $cmd = "$^X $0 $verbosity $script";
+
+ # When
+ my @output = `$cmd 2>&1`;
+
+ my $found_executing = 0;
+ for my $line ( @output ) {
+ if ( $line =~ qr/Executing: / ) {
+ $found_executing = 1;
+ }
+ }
+
+ # Then
+ is($found_executing, $expect_executing, "$verbosity Executing:
$found_executing");
+
+ if ( $expect_output eq "output" ) {
+ isnt(@output, 0, "Got output for $verbosity/$script");
} else {
- is($output, "", $name);
+ is(@output, 0, "no output for $verbosity/$script");
}
}
+
done_testing();
}
