Hello community, here is the log from the commit of package perl-App-MFILE for openSUSE:Factory checked in at 2016-10-20 23:10:05 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-App-MFILE (Old) and /work/SRC/openSUSE:Factory/.perl-App-MFILE.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-App-MFILE" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-App-MFILE/perl-App-MFILE.changes 2016-10-18 10:38:21.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-App-MFILE.new/perl-App-MFILE.changes 2016-10-20 23:10:41.000000000 +0200 @@ -1,0 +2,6 @@ +Tue Sep 27 15:02:22 UTC 2016 - [email protected] + +- updated to 0.180 + see /usr/share/doc/packages/perl-App-MFILE/Changes + +------------------------------------------------------------------- Old: ---- App-MFILE-0.178.tar.gz _service New: ---- App-MFILE-0.180.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-App-MFILE.spec ++++++ --- /var/tmp/diff_new_pack.sUeK9y/_old 2016-10-20 23:10:42.000000000 +0200 +++ /var/tmp/diff_new_pack.sUeK9y/_new 2016-10-20 23:10:42.000000000 +0200 @@ -17,14 +17,14 @@ Name: perl-App-MFILE -Version: 0.178 +Version: 0.180 Release: 0 %define cpan_name App-MFILE Summary: MFILE shared modules License: BSD-3-Clause Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/App-MFILE/ -Source0: App-MFILE-0.178.tar.gz +Source0: App-MFILE-0.180.tar.gz BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl @@ -46,9 +46,8 @@ %description This distro consists of general, reusable modules. Currently, there is only -one module, the App::MFILE::HTTP manpage, which is used by the -App::MFILE::WWW manpage, the App::Dochazka::WWW manpage, and the -App::Dochazka::CLI manpage. +one module, App::MFILE::HTTP, which is used by App::MFILE::WWW, +App::Dochazka::WWW, and App::Dochazka::CLI. %prep %setup -q -n %{cpan_name}-%{version} @@ -66,6 +65,6 @@ %files -f %{name}.files %defattr(-,root,root,755) -%doc Changes README.rst +%doc Changes LICENSE README.rst %changelog ++++++ App-MFILE-0.178.tar.gz -> App-MFILE-0.180.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/App-MFILE-0.178/Changes new/App-MFILE-0.180/Changes --- old/App-MFILE-0.178/Changes 2016-09-04 21:49:58.000000000 +0200 +++ new/App-MFILE-0.180/Changes 2016-09-27 17:02:12.000000000 +0200 @@ -116,3 +116,10 @@ - MANIFEST.SKIP: skip .travis.yml - Drop ignore.txt +0.179 2016-09-26 09:53 CEST +- HTTP.pm: return body even on error in rest_req() +- HTTP.pm: convert non-JSON bodies to JSON + +0.180 2016-09-27 17:01 CEST +- HTTP.pm: remove $body / $body_json confusion + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/App-MFILE-0.178/META.json new/App-MFILE-0.180/META.json --- old/App-MFILE-0.178/META.json 2016-09-04 21:49:58.000000000 +0200 +++ new/App-MFILE-0.180/META.json 2016-09-27 17:02:12.000000000 +0200 @@ -41,7 +41,7 @@ "provides" : { "App::MFILE" : { "file" : "lib/App/MFILE.pm", - "version" : "0.178" + "version" : "0.180" }, "App::MFILE::HTTP" : { "file" : "lib/App/MFILE/HTTP.pm" @@ -57,6 +57,6 @@ "url" : "https://sourceforge.net/p/mfile/code/"; } }, - "version" : "0.178", + "version" : "0.180", "x_serialization_backend" : "JSON::PP version 2.27203" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/App-MFILE-0.178/META.yml new/App-MFILE-0.180/META.yml --- old/App-MFILE-0.178/META.yml 2016-09-04 21:49:58.000000000 +0200 +++ new/App-MFILE-0.180/META.yml 2016-09-27 17:02:12.000000000 +0200 @@ -19,7 +19,7 @@ provides: App::MFILE: file: lib/App/MFILE.pm - version: '0.178' + version: '0.180' App::MFILE::HTTP: file: lib/App/MFILE/HTTP.pm requires: @@ -33,5 +33,5 @@ homepage: https://sourceforge.net/projects/mfile/ license: http://opensource.org/licenses/bsd-license.php repository: https://sourceforge.net/p/mfile/code/ -version: '0.178' +version: '0.180' x_serialization_backend: 'CPAN::Meta::YAML version 0.012' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/App-MFILE-0.178/lib/App/MFILE/HTTP.pm new/App-MFILE-0.180/lib/App/MFILE/HTTP.pm --- old/App-MFILE-0.178/lib/App/MFILE/HTTP.pm 2016-09-04 21:49:58.000000000 +0200 +++ new/App-MFILE-0.180/lib/App/MFILE/HTTP.pm 2016-09-27 17:02:12.000000000 +0200 @@ -46,6 +46,7 @@ use JSON; use LWP::UserAgent; use Params::Validate qw( :all ); +use Try::Tiny; =head1 NAME @@ -161,14 +162,19 @@ my $response = $ua->request( $r ); # process response - my $body = $response->decoded_content; - $log->debug( "rest_req: decoded content" . Dumper $body ); + my $body_json = $response->decoded_content; + $log->debug( "rest_req: decoded JSON body " . Dumper $body_json ); $response->content(''); - my $body_json = JSON->new->decode( $body ) if $response->is_success; + my $body; + try { + $body = JSON->new->decode( $body_json ); + } catch { + $body = { 'code' => $body, 'text' => $body }; + }; return { hr => $response, - body => $body_json + body => $body }; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/App-MFILE-0.178/lib/App/MFILE.pm new/App-MFILE-0.180/lib/App/MFILE.pm --- old/App-MFILE-0.178/lib/App/MFILE.pm 2016-09-04 21:49:58.000000000 +0200 +++ new/App-MFILE-0.180/lib/App/MFILE.pm 2016-09-27 17:02:12.000000000 +0200 @@ -52,11 +52,11 @@ =head1 VERSION -Version 0.178 +Version 0.180 =cut -our $VERSION = '0.178'; +our $VERSION = '0.180';
