This is an automated email from the git hooks/post-receive script. alexm pushed a commit to branch master in repository pkg-perl-tools.
commit c32011b3ba044b09ffc6dcf0e90a3fd12c973f8d Author: Alex Muntada <al...@debian.org> Date: Tue Nov 21 19:56:05 2017 +0100 Add test for a failing patch --- t/failing.patch | 10 ++++++++++ t/github.t | 20 ++++++++++++++++++++ 2 files changed, 30 insertions(+) diff --git a/t/failing.patch b/t/failing.patch new file mode 100644 index 0000000..70640b8 --- /dev/null +++ b/t/failing.patch @@ -0,0 +1,10 @@ +Description: This is a failing dummy patch for testing +Author: Alex Muntada <al...@debian.org> +Forwarded: no + +diff --git a/dummy.txt b/dummy.txt +--- a/dummy.txt ++++ b/dummy.txt +@@ -1 +1,2 @@ + Do not feel free to patch this file. ++This line is added. diff --git a/t/github.t b/t/github.t index ee3e995..df8e2d3 100644 --- a/t/github.t +++ b/t/github.t @@ -73,4 +73,24 @@ subtest 'fallback' => sub { done_testing(); }; +subtest 'failing pull request' => sub { + my %info = Debian::PkgPerl::Patch + ->new( patch => 't/failing.patch' ) + ->retrieve_patch_info(); + + my $msg = Debian::PkgPerl::Message->new( + %params, + info => \%info, + interactive => 0, + ); + + my $gh = new_ok( $class, [ message => $msg ] ); + + my $url = $gh->forward(); + isnt( $url, undef, 'failing pull request' ); + diag $url; + + done_testing(); +}; + done_testing(); -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/pkg-perl-tools.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits