Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Net-OBS-Client for
openSUSE:Factory checked in at 2021-01-15 19:47:05
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Net-OBS-Client (Old)
and /work/SRC/openSUSE:Factory/.perl-Net-OBS-Client.new.28504 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Net-OBS-Client"
Fri Jan 15 19:47:05 2021 rev:2 rq:863351 version:0.0.6
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Net-OBS-Client/perl-Net-OBS-Client.changes
2021-01-13 18:35:59.370361780 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Net-OBS-Client.new.28504/perl-Net-OBS-Client.changes
2021-01-15 19:47:41.214152116 +0100
@@ -1,0 +2,12 @@
+Wed Jan 13 13:19:30 UTC 2021 - Frank Schreiner <fschrei...@suse.com>
+
+- updated to 0.0.6
+ see /usr/share/doc/packages/perl-Net-OBS-Client/Changes
+
+-------------------------------------------------------------------
+Wed Jan 13 12:46:04 UTC 2021 - Frank Schreiner <fschrei...@suse.com>
+
+- updated to 0.0.5
+ see /usr/share/doc/packages/perl-Net-OBS-Client/Changes
+
+-------------------------------------------------------------------
Old:
----
Net-OBS-Client-0.0.5.tar.gz
New:
----
Net-OBS-Client-0.0.6.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Net-OBS-Client.spec ++++++
--- /var/tmp/diff_new_pack.6Uwdnn/_old 2021-01-15 19:47:41.678152807 +0100
+++ /var/tmp/diff_new_pack.6Uwdnn/_new 2021-01-15 19:47:41.678152807 +0100
@@ -17,7 +17,7 @@
Name: perl-Net-OBS-Client
-Version: 0.0.5
+Version: 0.0.6
Release: 0
%define cpan_name Net-OBS-Client
Summary: Simple OBS API calls
++++++ Net-OBS-Client-0.0.5.tar.gz -> Net-OBS-Client-0.0.6.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/Makefile.PL
new/Net-OBS-Client/Makefile.PL
--- old/Net-OBS-Client/Makefile.PL 2021-01-12 20:51:51.768845513 +0100
+++ new/Net-OBS-Client/Makefile.PL 2021-01-13 08:09:09.909076387 +0100
@@ -16,6 +16,7 @@
},
BUILD_REQUIRES => {
'Test::More' => 0,
+ 'XML::Parser' => 0,
},
PREREQ_PM => {
'Moose' => 0,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/RPM/perl-Net-OBS-Client.spec
new/Net-OBS-Client/RPM/perl-Net-OBS-Client.spec
--- old/Net-OBS-Client/RPM/perl-Net-OBS-Client.spec 2020-12-07
09:55:14.220259976 +0100
+++ new/Net-OBS-Client/RPM/perl-Net-OBS-Client.spec 1970-01-01
01:00:00.000000000 +0100
@@ -1,82 +0,0 @@
-#
-# Copyright (c) 2015 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
-# upon. The license for this file, and modifications and additions to the
-# file, is the same license as for the pristine package itself (unless the
-# license for the pristine package is not an Open Source License, in which
-# case the license is the MIT License). An "Open Source License" is a
-# license that conforms to the Open Source Definition (Version 1.9)
-# published by the Open Source Initiative.
-
-# Please submit bugfixes or comments via http://bugs.opensuse.org/
-#
-%global debug_package %{nil}
-
-%define cpan_name Net-OBS-Client
-
-Name: perl-%{cpan_name}
-Version: 0.0.4
-Release: 1
-Summary: Simplify usage of open build service API calls in perl
-License: GPL-1.0+ or Artistic-1.0
-Group: Development/Libraries/Perl
-Url: http://github.com/M0ses/%{cpan_name}
-Source: %{cpan_name}-%{version}.tar.gz
-BuildRoot: %{_tmppath}/%{name}-%{version}-build
-
-BuildRequires: perl
-BuildRequires: perl-macros
-
-BuildRequires: perl(Moose)
-BuildRequires: perl(Moose::Role)
-BuildRequires: perl(LWP::UserAgent)
-BuildRequires: perl(XML::Structured)
-BuildRequires: perl(Config::INI::Reader)
-BuildRequires: perl(Config::Tiny)
-BuildRequires: perl(HTTP::Request)
-BuildRequires: perl(HTTP::Cookies)
-BuildRequires: perl(URI::URL)
-BuildRequires: perl(Path::Class)
-
-Requires: perl(Moose)
-Requires: perl(Moose::Role)
-Requires: perl(LWP::UserAgent)
-Requires: perl(XML::Structured)
-Requires: perl(Config::INI::Reader)
-Requires: perl(Config::Tiny)
-Requires: perl(HTTP::Request)
-Requires: perl(HTTP::Cookies)
-Requires: perl(URI::URL)
-Requires: perl(Path::Class)
-
-Provides: perl(Net::OBS::Client)
-%{perl_requires}
-
-%description
-Net::OBS::Client aims to simplify usage of OBS (https://openbuildservice.org)
API calls in perl.
-
-%prep
-%setup -q -n %{cpan_name}-%{version}
-
-%build
-%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"
-%{__make} %{?_smp_mflags}
-
-%check
-%{__make} test
-
-%install
-%perl_make_install
-%perl_process_packlist
-%perl_gen_filelist
-
-%files -f %{name}.files
-%defattr(-,root,root,755)
-%doc Changes README
-
-%changelog
-* Fri Mar 11 2016 Frank Schreiner - 0.0.1-1
-- intial version
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/contrib/buildresults.pl
new/Net-OBS-Client/contrib/buildresults.pl
--- old/Net-OBS-Client/contrib/buildresults.pl 2020-12-07 09:41:30.698006193
+0100
+++ new/Net-OBS-Client/contrib/buildresults.pl 2021-01-13 09:25:50.209946567
+0100
@@ -8,15 +8,15 @@
use FindBin;
use lib "$FindBin::Bin/../lib";
-use Net::OBS::Client::BuildResults;
+use Net::OBS::Client;
my $project = 'OBS:Server:Unstable';
my $package = 'obs-server';
my $repo = 'openSUSE_Factory';
my $arch = 'x86_64';
-
-my $obj = Net::OBS::Client::BuildResults->new(
+my $c = Net::OBS::Client->new();
+my $obj = $c->buildresults(
project => $project,
package => $package,
repository => $repo,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/contrib/package.pl
new/Net-OBS-Client/contrib/package.pl
--- old/Net-OBS-Client/contrib/package.pl 2020-12-07 09:42:31.662173025
+0100
+++ new/Net-OBS-Client/contrib/package.pl 2021-01-13 09:10:59.659430657
+0100
@@ -8,23 +8,26 @@
use FindBin;
use lib "$FindBin::Bin/../lib";
-use Net::OBS::Client::Package;
+use Net::OBS::Client;
-my $p = Net::OBS::Client::Package->new(
+my $c = Net::OBS::Client->new(
+);
+
+my $pkg = $c->package(
project => 'OBS:Server:Unstable',
name => 'obs-server',
repository => 'openSUSE_Factory',
arch => 'x86_64',
);
-my $s = $p->fetch_status();
+my $s = $pkg->fetch_status();
print Dumper($s);
my $repo = 'openSUSE_Factory';
my $arch = 'x86_64';
-print "code: ".$p->code($repo, $arch)."\n";
+print "code: ".$pkg->code($repo, $arch)."\n";
exit 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/contrib/project.pl
new/Net-OBS-Client/contrib/project.pl
--- old/Net-OBS-Client/contrib/project.pl 2020-12-07 09:42:45.858211867
+0100
+++ new/Net-OBS-Client/contrib/project.pl 2021-01-13 08:49:58.691880500
+0100
@@ -17,16 +17,16 @@
my $repo = 'openSUSE_Factory';
my $arch = 'x86_64';
-my $p = Net::OBS::Client::Project->new(
- name => $project,
+my $c = Net::OBS::Client->new(
use_oscrc => 0,
);
-my $s = $p->fetch_resultlist(package => $package);
+my $prj = $c->project(name => $project);
+my $s = $prj->fetch_resultlist(package => $package);
print Dumper($s);
-print "code: ".$p->code($repo, $arch)."\n";
-print "dirty: ".$p->dirty($repo, $arch)."\n";
+print "code: ".$prj->code($repo, $arch)."\n";
+print "dirty: ".$prj->dirty($repo, $arch)."\n";
exit 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/lib/Net/OBS/Client/Package.pm
new/Net-OBS-Client/lib/Net/OBS/Client/Package.pm
--- old/Net-OBS-Client/lib/Net/OBS/Client/Package.pm 2021-01-12
20:45:15.883706218 +0100
+++ new/Net-OBS-Client/lib/Net/OBS/Client/Package.pm 2021-01-13
09:28:47.258446883 +0100
@@ -59,8 +59,6 @@
=cut
-has ['+project','+repository','+arch'] => ( required => 1 );
-
has details => (
is => 'rw',
isa => 'Str'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Net-OBS-Client/lib/Net/OBS/Client/Roles/BuildStatus.pm
new/Net-OBS-Client/lib/Net/OBS/Client/Roles/BuildStatus.pm
--- old/Net-OBS-Client/lib/Net/OBS/Client/Roles/BuildStatus.pm 2019-10-02
09:41:18.717611195 +0200
+++ new/Net-OBS-Client/lib/Net/OBS/Client/Roles/BuildStatus.pm 2021-01-13
08:47:20.575437504 +0100
@@ -55,7 +55,6 @@
has name => (
is => 'ro',
isa => 'Str',
- required => 1
);
1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-OBS-Client/lib/Net/OBS/Client.pm
new/Net-OBS-Client/lib/Net/OBS/Client.pm
--- old/Net-OBS-Client/lib/Net/OBS/Client.pm 2021-01-12 20:46:02.695840936
+0100
+++ new/Net-OBS-Client/lib/Net/OBS/Client.pm 2021-01-13 11:42:55.162028131
+0100
@@ -1,10 +1,45 @@
package Net::OBS::Client;
use Moose;
+use Net::OBS::Client::Project;
+use Net::OBS::Client::Package;
+use Net::OBS::Client::BuildResults;
+
with "Net::OBS::Client::Roles::Client";
-our $VERSION = '0.0.4';
+our $VERSION = '0.0.6';
+
+sub project {
+ my $self = shift;
+ return Net::OBS::Client::Project->new(
+ apiurl => $self->apiurl,
+ use_oscrc => $self->use_oscrc,
+ @_
+ );
+}
+
+sub package {
+ my $self = shift;
+ return Net::OBS::Client::Package->new(
+ apiurl => $self->apiurl,
+ use_oscrc => $self->use_oscrc,
+ @_
+ );
+}
+
+sub buildresults {
+ my $self = shift;
+ return Net::OBS::Client::BuildResults->new(
+ apiurl => $self->apiurl,
+ use_oscrc => $self->use_oscrc,
+ @_
+ );
+}
+
+1; # End of Net::OBS::Client
+
+__END__
=head1 NAME
@@ -12,6 +47,32 @@
=head1 SYNOPSIS
+ #
+ use Net::OBS::Client;
+ my $c = Net::OBS::Client->new(
+ apiurl => $apiurl,
+ use_oscrc => 0,
+ );
+
+ my $prj = $c->project(
+ name => $project,
+ );
+
+ my $pkg = $c->package(
+ project => 'OBS:Server:Unstable',
+ name => 'obs-server',
+ repository => 'openSUSE_Factory',
+ arch => 'x86_64',
+ );
+
+ my $res = $c->buildresults(
+ project => $project,
+ package => $package,
+ repository => $repo,
+ arch => $arch,
+ );
+
+ #
use Net::OBS::Client::Project;
use Net::OBS::Client::Package;
@@ -21,7 +82,7 @@
use_oscrc => 0,
);
- my $s = $p->fetch_resultlist(package => $package);
+ my $s = $prj->fetch_resultlist(package => $package);
my $pkg = Net::OBS::Client::Package->new(
project => 'OBS:Server:Unstable',
@@ -32,7 +93,7 @@
apiurl => 'https://api.opensuse.org/public'
);
- my $state = $p->fetch_status();
+ my $state = $pkg->fetch_status();
=head1 DESCRIPTION
@@ -59,4 +120,3 @@
=cut
-1; # End of Net::OBS::Client
