Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-HTTP-BrowserDetect for
openSUSE:Factory checked in at 2021-10-23 00:51:29
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-HTTP-BrowserDetect (Old)
and /work/SRC/openSUSE:Factory/.perl-HTTP-BrowserDetect.new.1890 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-HTTP-BrowserDetect"
Sat Oct 23 00:51:29 2021 rev:4 rq:926935 version:3.35
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-HTTP-BrowserDetect/perl-HTTP-BrowserDetect.changes
2021-08-10 10:28:32.709711621 +0200
+++
/work/SRC/openSUSE:Factory/.perl-HTTP-BrowserDetect.new.1890/perl-HTTP-BrowserDetect.changes
2021-10-23 00:52:12.929154173 +0200
@@ -1,0 +2,14 @@
+Wed Oct 20 14:44:09 UTC 2021 - Tina M??ller <[email protected]>
+
+- Add precious.toml to skip_doc
+
+-------------------------------------------------------------------
+Wed Oct 20 03:06:19 UTC 2021 - Tina M??ller <[email protected]>
+
+- updated to 3.35
+ see /usr/share/doc/packages/perl-HTTP-BrowserDetect/Changes
+
+ 3.35 2021-10-19 15:53:52Z
+ - Add Samsung as a detected browser (GH#192) (Olaf Alders)
+
+-------------------------------------------------------------------
Old:
----
HTTP-BrowserDetect-3.34.tar.gz
New:
----
HTTP-BrowserDetect-3.35.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-HTTP-BrowserDetect.spec ++++++
--- /var/tmp/diff_new_pack.SL0nok/_old 2021-10-23 00:52:13.325154349 +0200
+++ /var/tmp/diff_new_pack.SL0nok/_new 2021-10-23 00:52:13.329154350 +0200
@@ -18,7 +18,7 @@
%define cpan_name HTTP-BrowserDetect
Name: perl-HTTP-BrowserDetect
-Version: 3.34
+Version: 3.35
Release: 0
Summary: Determine Web browser, version, and platform from an HTTP user
agent string
License: Artistic-1.0 OR GPL-1.0-or-later
++++++ HTTP-BrowserDetect-3.34.tar.gz -> HTTP-BrowserDetect-3.35.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/Changes
new/HTTP-BrowserDetect-3.35/Changes
--- old/HTTP-BrowserDetect-3.34/Changes 2021-08-03 22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/Changes 2021-10-19 17:53:58.000000000 +0200
@@ -1,8 +1,11 @@
Revision history for Perl extension HTTP::BrowserDetect.
+3.35 2021-10-19 15:53:52Z
+ - Add Samsung as a detected browser (GH#192) (Olaf Alders)
+
3.34 2021-08-03 20:09:33Z
- Fix modern UCBrowser detection (GH#189) (konstantin-pustovalov-qs)
- - Switch from Test::FailWarnings to Test::Warnings (GH#190) (Olaf Alders
+ - Switch from Test::FailWarnings to Test::Warnings (GH#190) (Olaf Alders)
3.33 2021-07-21 14:38:49Z
- Yahoo iOS App as not a robot (GH#188) (Yasuharu Iida)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/MANIFEST
new/HTTP-BrowserDetect-3.35/MANIFEST
--- old/HTTP-BrowserDetect-3.34/MANIFEST 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/MANIFEST 2021-10-19 17:53:58.000000000
+0200
@@ -16,6 +16,7 @@
lib/HTTP/BrowserDetect.pm
perlcriticrc
perltidyrc
+precious.toml
t/00-report-prereqs.dd
t/00-report-prereqs.t
t/01-detect.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/META.json
new/HTTP-BrowserDetect-3.35/META.json
--- old/HTTP-BrowserDetect-3.34/META.json 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/META.json 2021-10-19 17:53:58.000000000
+0200
@@ -97,7 +97,7 @@
"web" : "https://github.com/oalders/http-browserdetect";
}
},
- "version" : "3.34",
+ "version" : "3.35",
"x_Dist_Zilla" : {
"perl" : {
"version" : "5.030002"
@@ -365,6 +365,7 @@
"puf",
"realplayer",
"rubylib",
+ "samsung",
"seamonkey",
"specialarchiver",
"staroffice",
@@ -639,7 +640,7 @@
"changelog" : "Changes"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"repo_root" : "."
}
},
@@ -650,7 +651,7 @@
"class" : "Dist::Zilla::Plugin::Git::Contributors",
"config" : {
"Dist::Zilla::Plugin::Git::Contributors" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"include_authors" : 0,
"include_releaser" : 1,
"order_by" : "name",
@@ -770,7 +771,7 @@
"changelog" : "Changes"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"repo_root" : "."
},
"Dist::Zilla::Role::Git::StringFormatter" : {
@@ -787,12 +788,12 @@
"branch" : null,
"changelog" : "Changes",
"signed" : 0,
- "tag" : "v3.34",
+ "tag" : "v3.35",
"tag_format" : "v%V",
"tag_message" : "v%V"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"repo_root" : "."
},
"Dist::Zilla::Role::Git::StringFormatter" : {
@@ -843,7 +844,7 @@
"changelog" : "Changes"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"repo_root" : "."
},
"Dist::Zilla::Role::Git::StringFormatter" : {
@@ -863,7 +864,7 @@
"remotes_must_exist" : 1
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.32.0",
+ "git_version" : "2.33.1",
"repo_root" : "."
}
},
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/META.yml
new/HTTP-BrowserDetect-3.35/META.yml
--- old/HTTP-BrowserDetect-3.34/META.yml 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/META.yml 2021-10-19 17:53:58.000000000
+0200
@@ -38,7 +38,7 @@
bugtracker: https://github.com/oalders/http-browserdetect/issues
homepage: https://github.com/oalders/http-browserdetect
repository: https://github.com/oalders/http-browserdetect.git
-version: '3.34'
+version: '3.35'
x_Dist_Zilla:
perl:
version: '5.030002'
@@ -275,6 +275,7 @@
- puf
- realplayer
- rubylib
+ - samsung
- seamonkey
- specialarchiver
- staroffice
@@ -489,7 +490,7 @@
allow_dirty_match: []
changelog: Changes
Dist::Zilla::Role::Git::Repo:
- git_version: 2.32.0
+ git_version: 2.33.1
repo_root: .
name: '@Author::OALDERS/Git::Check'
version: '2.048'
@@ -497,7 +498,7 @@
class: Dist::Zilla::Plugin::Git::Contributors
config:
Dist::Zilla::Plugin::Git::Contributors:
- git_version: 2.32.0
+ git_version: 2.33.1
include_authors: 0
include_releaser: 1
order_by: name
@@ -589,7 +590,7 @@
allow_dirty_match: []
changelog: Changes
Dist::Zilla::Role::Git::Repo:
- git_version: 2.32.0
+ git_version: 2.33.1
repo_root: .
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
@@ -602,11 +603,11 @@
branch: ~
changelog: Changes
signed: 0
- tag: v3.34
+ tag: v3.35
tag_format: v%V
tag_message: v%V
Dist::Zilla::Role::Git::Repo:
- git_version: 2.32.0
+ git_version: 2.33.1
repo_root: .
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
@@ -644,7 +645,7 @@
- (?^:^lib/.*\.pm$)
changelog: Changes
Dist::Zilla::Role::Git::Repo:
- git_version: 2.32.0
+ git_version: 2.33.1
repo_root: .
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
@@ -658,7 +659,7 @@
- origin
remotes_must_exist: 1
Dist::Zilla::Role::Git::Repo:
- git_version: 2.32.0
+ git_version: 2.33.1
repo_root: .
name: '@Author::OALDERS/Git::Push'
version: '2.048'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/Makefile.PL
new/HTTP-BrowserDetect-3.35/Makefile.PL
--- old/HTTP-BrowserDetect-3.34/Makefile.PL 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/Makefile.PL 2021-10-19 17:53:58.000000000
+0200
@@ -33,7 +33,7 @@
"Test::NoWarnings" => 0,
"Test::Warnings" => 0
},
- "VERSION" => "3.34",
+ "VERSION" => "3.35",
"test" => {
"TESTS" => "t/*.t"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/README.md
new/HTTP-BrowserDetect-3.35/README.md
--- old/HTTP-BrowserDetect-3.34/README.md 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/README.md 2021-10-19 17:53:58.000000000
+0200
@@ -4,7 +4,7 @@
# VERSION
-version 3.34
+version 3.35
# SYNOPSIS
@@ -77,7 +77,7 @@
brave, browsex, dalvik, elinks, links, lynx, emacs, epiphany, galeon,
konqueror, icab, lotusnotes, mosaic, mozilla, netfront, netscape,
n3ds, dsi, obigo, polaris, pubsub, realplayer, seamonkey, silk,
-staroffice, ucbrowser, webtv
+staroffice, ucbrowser, webtv, samsung
If the browser could not be identified (either because unrecognized
or because it is a robot), returns `undef`.
@@ -426,6 +426,8 @@
### safari
+### samsung
+
### seamonkey
### silk
@@ -824,33 +826,19 @@
[https://github.com/oalders/http-browserdetect/issues](https://github.com/oalders/http-browserdetect/issues)
-- CPAN Ratings
-
-
[http://cpanratings.perl.org/d/HTTP-BrowserDetect](http://cpanratings.perl.org/d/HTTP-BrowserDetect)
-
- Search CPAN
[https://metacpan.org/module/HTTP::BrowserDetect](https://metacpan.org/module/HTTP::BrowserDetect)
-# BUGS AND LIMITATIONS
-
-The biggest limitation at this point is the test suite, which really needs to
-have many more UserAgent strings to test against.
-
# CONTRIBUTING
Patches are certainly welcome, with many thanks for the excellent contributions
which have already been received. The preferred method of patching would be to
-fork the GitHub repo and then send me a pull request, but plain old patch files
-are also welcome.
+fork the GitHub repo and then send a pull request.
-If you're able to add test cases, this will speed up the time to release your
+Please include a test case as this will speed up the time to release your
changes. Just edit t/useragents.json so that the test coverage includes any
-changes you have made. Please contact me if you have any questions.
-
-This distribution uses
[Dist::Zilla](https://metacpan.org/pod/Dist%3A%3AZilla). If you're not familiar
with this module,
-please see
[https://github.com/oalders/http-browserdetect/issues/5](https://github.com/oalders/http-browserdetect/issues/5)
for some
-helpful tips to get you started.
+changes you have made. Please open a GitHub issue if you have any questions.
# AUTHORS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/lib/HTTP/BrowserDetect.pm
new/HTTP-BrowserDetect-3.35/lib/HTTP/BrowserDetect.pm
--- old/HTTP-BrowserDetect-3.34/lib/HTTP/BrowserDetect.pm 2021-08-03
22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/lib/HTTP/BrowserDetect.pm 2021-10-19
17:53:58.000000000 +0200
@@ -5,7 +5,7 @@
package HTTP::BrowserDetect;
-our $VERSION = '3.34';
+our $VERSION = '3.35';
# Operating Systems
our @OS_TESTS = qw(
@@ -78,7 +78,7 @@
epiphany ucbrowser dalvik
edge pubsub adm
brave imagesearcherpro polaris
- edgelegacy
+ edgelegacy samsung
);
our @IE_TESTS = qw(
@@ -382,6 +382,7 @@
puf => 'puf',
realplayer => 'RealPlayer',
safari => 'Safari',
+ samsung => 'Samsung',
seamonkey => 'SeaMonkey',
silk => 'Silk',
staroffice => 'StarOffice',
@@ -496,6 +497,7 @@
### Accessors for computed-on-demand test attributes
foreach my $test ( @ENGINE_TESTS, @MISC_TESTS ) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
*{$test} = sub {
my ($self) = @_;
@@ -507,6 +509,7 @@
@OS_TESTS, @WINDOWS_TESTS, @MAC_TESTS, @UNIX_TESTS,
@BSD_TESTS, @GAMING_TESTS
) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
*{$test} = sub {
my ($self) = @_;
@@ -516,6 +519,7 @@
}
foreach my $test ( @BROWSER_TESTS, @FIREFOX_TESTS ) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
*{$test} = sub {
my ($self) = @_;
@@ -524,6 +528,7 @@
}
foreach my $test (@OLD_ROBOT_TESTS) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
# For the 'robot' test, we return undef instead of 0 if it's
@@ -541,6 +546,7 @@
@NETSCAPE_TESTS, @IE_TESTS, @AOL_TESTS,
@OPERA_TESTS
) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
*{$test} = sub {
my ($self) = @_;
@@ -550,6 +556,7 @@
}
foreach my $test (@DEVICE_TESTS) {
+ ## no critic (TestingAndDebugging::ProhibitNoStrict)
no strict 'refs';
*{$test} = sub {
my ($self) = @_;
@@ -760,6 +767,12 @@
$browser = 'silk';
$browser_tests->{$browser} = 1;
}
+ elsif ( index( $ua, 'samsungbrowser' ) != -1 ) {
+
+ # Has to go above Chrome, it includes 'Chrome/'
+ $browser = 'samsung';
+ $browser_tests->{$browser} = 1;
+ }
elsif ( index( $ua, 'ucbrowser' ) != -1 ) {
# Has to go above Safari, Mozilla and Chrome
@@ -1948,6 +1961,11 @@
$minor = $2;
$beta = $3;
}
+ elsif ( $browser eq 'samsung' && $ua =~ m{samsungbrowser/(\d+)\.(\d+)\s} )
+ {
+ $major = $1;
+ $minor = $2;
+ }
# If we didn't match a browser-specific test, we look for
# '$browser/x.y.z'
@@ -2214,27 +2232,27 @@
&& index( $ua, 'mobile' ) == -1
&& index( $ua, 'safari' ) != -1 )
|| ( $browser_tests->{firefox} && index( $ua, 'tablet' ) != -1 )
- || index( $ua, 'kindle' ) != -1
- || index( $ua, 'xoom' ) != -1
- || index( $ua, 'flyer' ) != -1
- || index( $ua, 'jetstream' ) != -1
- || index( $ua, 'transformer' ) != -1
- || index( $ua, 'novo7' ) != -1
+ || index( $ua, 'an10bg3' ) != -1
+ || index( $ua, 'an10bg3dt' ) != -1
|| index( $ua, 'an10g2' ) != -1
|| index( $ua, 'an7bg3' ) != -1
+ || index( $ua, 'an7dg3' ) != -1
+ || index( $ua, 'an7dg3childpad' ) != -1
+ || index( $ua, 'an7dg3st' ) != -1
|| index( $ua, 'an7fg3' ) != -1
- || index( $ua, 'an8g3' ) != -1
- || index( $ua, 'an8cg3' ) != -1
|| index( $ua, 'an7g3' ) != -1
+ || index( $ua, 'an8cg3' ) != -1
+ || index( $ua, 'an8g3' ) != -1
|| index( $ua, 'an9g3' ) != -1
- || index( $ua, 'an7dg3' ) != -1
- || index( $ua, 'an7dg3st' ) != -1
- || index( $ua, 'an7dg3childpad' ) != -1
- || index( $ua, 'an10bg3' ) != -1
- || index( $ua, 'an10bg3dt' ) != -1
+ || index( $ua, 'flyer' ) != -1
+ || index( $ua, 'hp-tablet' ) != -1
+ || index( $ua, 'jetstream' ) != -1
+ || index( $ua, 'kindle' ) != -1
+ || index( $ua, 'novo7' ) != -1
|| index( $ua, 'opera tablet' ) != -1
|| index( $ua, 'rim tablet' ) != -1
- || index( $ua, 'hp-tablet' ) != -1
+ || index( $ua, 'transformer' ) != -1
+ || index( $ua, 'xoom' ) != -1
);
if ( !$device_tests->{tablet} ) {
@@ -2272,7 +2290,6 @@
|| index( $ua, 'symbian' ) != -1
|| index( $ua, 'webos' ) != -1
|| index( $ua, 'samsung' ) != -1
- || index( $ua, 'samsung' ) != -1
|| index( $ua, 'zetor' ) != -1
|| index( $ua, 'android' ) != -1
|| index( $ua, 'symbos' ) != -1
@@ -2700,18 +2717,10 @@
sub engine {
my ($self) = @_;
- # *shrug*
- if ( my $engine_string = $self->engine_string ) {
- if ( $engine_string eq 'MSIE' ) {
- return 'ie';
- }
- else {
- return lc $engine_string;
- }
- }
- else {
- return undef;
- }
+ return
+ !$self->engine_string ? undef
+ : $self->engine_string eq 'MSIE' ? 'ie'
+ : lc( $self->engine_string );
}
sub engine_string {
@@ -2755,49 +2764,29 @@
sub engine_version {
my ($self) = @_;
- if ( $self->{engine_version} ) {
- if ( $self->{engine_version} =~ m{^(\d+(\.\d+)?)} ) {
- return $1;
- }
- }
-
- return undef;
+ return $self->{engine_version}
+ && $self->{engine_version} =~ m{^(\d+(\.\d+)?)} ? $1 : undef;
}
sub engine_major {
my ($self) = @_;
- if ( $self->{engine_version} ) {
- if ( $self->{engine_version} =~ m{^(\d+)} ) {
- return $1;
- }
- }
-
- return undef;
+ return $self->{engine_version}
+ && $self->{engine_version} =~ m{^(\d+)} ? $1 : undef;
}
sub engine_minor {
my ($self) = @_;
- if ( $self->{engine_version} ) {
- if ( $self->{engine_version} =~ m{^\d+(\.\d+)} ) {
- return $1;
- }
- }
-
- return undef;
+ return $self->{engine_version}
+ && $self->{engine_version} =~ m{^\d+(\.\d+)} ? $1 : undef;
}
sub engine_beta {
my ($self) = @_;
- if ( $self->{engine_version} ) {
- if ( $self->{engine_version} =~ m{^\d+\.\d+([\.\d\+]*)} ) {
- return $1;
- }
- }
-
- return undef;
+ return $self->{engine_version}
+ && $self->{engine_version} =~ m{^\d+\.\d+([\.\d\+]*)} ? $1 : undef;
}
sub beta {
@@ -2919,7 +2908,8 @@
# so I explicitly test for it and add it
push @browser_properties, 'device' if ( $self->device() );
- return sort @browser_properties;
+ @browser_properties = sort @browser_properties;
+ return @browser_properties;
}
sub lib {
@@ -2988,7 +2978,7 @@
=head1 VERSION
-version 3.34
+version 3.35
=head1 SYNOPSIS
@@ -3061,7 +3051,7 @@
brave, browsex, dalvik, elinks, links, lynx, emacs, epiphany, galeon,
konqueror, icab, lotusnotes, mosaic, mozilla, netfront, netscape,
n3ds, dsi, obigo, polaris, pubsub, realplayer, seamonkey, silk,
-staroffice, ucbrowser, webtv
+staroffice, ucbrowser, webtv, samsung
If the browser could not be identified (either because unrecognized
or because it is a robot), returns C<undef>.
@@ -3410,6 +3400,8 @@
=head3 safari
+=head3 samsung
+
=head3 seamonkey
=head3 silk
@@ -3810,35 +3802,21 @@
L<https://github.com/oalders/http-browserdetect/issues>
-=item * CPAN Ratings
-
-L<http://cpanratings.perl.org/d/HTTP-BrowserDetect>
-
=item * Search CPAN
L<https://metacpan.org/module/HTTP::BrowserDetect>
=back
-=head1 BUGS AND LIMITATIONS
-
-The biggest limitation at this point is the test suite, which really needs to
-have many more UserAgent strings to test against.
-
=head1 CONTRIBUTING
Patches are certainly welcome, with many thanks for the excellent contributions
which have already been received. The preferred method of patching would be to
-fork the GitHub repo and then send me a pull request, but plain old patch files
-are also welcome.
+fork the GitHub repo and then send a pull request.
-If you're able to add test cases, this will speed up the time to release your
+Please include a test case as this will speed up the time to release your
changes. Just edit t/useragents.json so that the test coverage includes any
-changes you have made. Please contact me if you have any questions.
-
-This distribution uses L<Dist::Zilla>. If you're not familiar with this module,
-please see L<https://github.com/oalders/http-browserdetect/issues/5> for some
-helpful tips to get you started.
+changes you have made. Please open a GitHub issue if you have any questions.
=head1 AUTHORS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/precious.toml
new/HTTP-BrowserDetect-3.35/precious.toml
--- old/HTTP-BrowserDetect-3.34/precious.toml 1970-01-01 01:00:00.000000000
+0100
+++ new/HTTP-BrowserDetect-3.35/precious.toml 2021-10-19 17:53:58.000000000
+0200
@@ -0,0 +1,28 @@
+exclude = [
+ "blib",
+ ".build",
+ "HTTP-BrowserDetect-*",
+ "inc",
+ "t/00-*",
+ "t/author-*",
+ "test-data",
+ "t/release-*",
+ "xt/author",
+ "xt/release",
+]
+
+[commands.perlimports]
+type = "tidy"
+include = [ "**/*.{pl,pm,t,psgi}" ]
+cmd = [ "perlimports" ]
+tidy_flags = [
+ "--libs", "lib,t/lib",
+ "--log-filename", "/tmp/perlimports.txt",
+ "--log-level", "debug",
+ "--no-preserve-duplicates",
+ "--no-preserve-unused",
+ "-i",
+ "-f",
+]
+ok_exit_codes = 0
+expect_stderr = true
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/01-detect.t
new/HTTP-BrowserDetect-3.35/t/01-detect.t
--- old/HTTP-BrowserDetect-3.34/t/01-detect.t 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/t/01-detect.t 2021-10-19 17:53:58.000000000
+0200
@@ -10,7 +10,8 @@
use Path::Tiny qw( path );
use Test::Differences qw( eq_or_diff );
use Test::Warnings;
-use Test::More;
+use Test::More import =>
+ [ 'cmp_ok', 'diag', 'done_testing', 'is', 'is_deeply', 'ok', 'subtest' ];
# test that the module loads without errors
my $w;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/03-language.t
new/HTTP-BrowserDetect-3.35/t/03-language.t
--- old/HTTP-BrowserDetect-3.34/t/03-language.t 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/t/03-language.t 2021-10-19 17:53:58.000000000
+0200
@@ -3,9 +3,9 @@
use strict;
use warnings;
-use Test::More;
-use Test::NoWarnings ();
-use HTTP::BrowserDetect;
+use Test::More import => [ 'done_testing', 'ok' ];
+use Test::NoWarnings ();
+use HTTP::BrowserDetect ();
my $browser = HTTP::BrowserDetect->new(
"Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)");
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/04-random-order.t
new/HTTP-BrowserDetect-3.35/t/04-random-order.t
--- old/HTTP-BrowserDetect-3.34/t/04-random-order.t 2021-08-03
22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/t/04-random-order.t 2021-10-19
17:53:58.000000000 +0200
@@ -7,7 +7,8 @@
use JSON::PP ();
use Path::Tiny qw( path );
use Test::Warnings;
-use Test::More;
+use Test::More import =>
+ [ 'cmp_ok', 'done_testing', 'is_deeply', 'ok', 'subtest' ];
# test that the module loads without errors
my $w;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/05_robot.t
new/HTTP-BrowserDetect-3.35/t/05_robot.t
--- old/HTTP-BrowserDetect-3.34/t/05_robot.t 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/t/05_robot.t 2021-10-19 17:53:58.000000000
+0200
@@ -3,7 +3,7 @@
use HTTP::BrowserDetect ();
use List::Util ();
-use Test::More;
+use Test::More import => [ 'done_testing', 'is', 'ok', 'subtest', 'unlike' ];
my $detect = HTTP::BrowserDetect->new;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/99-warnings.t
new/HTTP-BrowserDetect-3.35/t/99-warnings.t
--- old/HTTP-BrowserDetect-3.34/t/99-warnings.t 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/t/99-warnings.t 2021-10-19 17:53:58.000000000
+0200
@@ -5,7 +5,7 @@
use HTTP::BrowserDetect ();
use Test::Warnings;
-use Test::More;
+use Test::More import => [ 'done_testing', 'is', 'ok', 'subtest' ];
ok( my $ua = HTTP::BrowserDetect->new(undef), q{undef produces no warnings} );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/add-field.pl
new/HTTP-BrowserDetect-3.35/t/add-field.pl
--- old/HTTP-BrowserDetect-3.34/t/add-field.pl 2021-08-03 22:09:39.000000000
+0200
+++ new/HTTP-BrowserDetect-3.35/t/add-field.pl 2021-10-19 17:53:58.000000000
+0200
@@ -14,11 +14,10 @@
use strict;
-use FindBin;
-use JSON::PP;
+use JSON::PP ();
use Path::Tiny qw( path );
-use HTTP::BrowserDetect;
+use HTTP::BrowserDetect ();
my $json_text = path( $ARGV[0] )->slurp;
my $tests = JSON::PP->new->ascii->decode($json_text);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/make-more-useragents.pl
new/HTTP-BrowserDetect-3.35/t/make-more-useragents.pl
--- old/HTTP-BrowserDetect-3.34/t/make-more-useragents.pl 2021-08-03
22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/t/make-more-useragents.pl 2021-10-19
17:53:58.000000000 +0200
@@ -22,11 +22,11 @@
use strict;
-use FindBin;
-use JSON::PP;
+use FindBin ();
+use JSON::PP ();
use Path::Tiny qw( path );
-use HTTP::BrowserDetect;
+use HTTP::BrowserDetect ();
my $json_text = path("$FindBin::Bin/useragents.json")->slurp;
my $tests = JSON::PP->new->ascii->decode($json_text);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/t/more-useragents.json
new/HTTP-BrowserDetect-3.35/t/more-useragents.json
--- old/HTTP-BrowserDetect-3.34/t/more-useragents.json 2021-08-03
22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/t/more-useragents.json 2021-10-19
17:53:58.000000000 +0200
@@ -8666,11 +8666,10 @@
"robot" : null
},
"Mozilla/5.0 (Linux; Android 5.0; SAMSUNG SM-G900P Build/LRX21T)
AppleWebKit/537.36 (KHTML, like Gecko) SamsungBrowser/2.1 Chrome/34.0.1847.76
Mobile Safari/537.36" : {
- "browser" : "chrome",
- "browser_beta" : ".1847.76",
- "browser_major" : "34",
- "browser_minor" : ".0",
- "browser_string" : "Chrome",
+ "browser" : "samsung",
+ "browser_major" : "2",
+ "browser_minor" : ".1",
+ "browser_string" : "Samsung",
"device" : "android",
"device_string" : "Android (SAMSUNG SM-G900P)",
"engine" : "webkit",
@@ -8683,7 +8682,7 @@
"device",
"android",
"mobile",
- "chrome",
+ "samsung",
"webkit"
],
"os" : "android",
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/HTTP-BrowserDetect-3.34/xt/author/pod-spell.t
new/HTTP-BrowserDetect-3.35/xt/author/pod-spell.t
--- old/HTTP-BrowserDetect-3.34/xt/author/pod-spell.t 2021-08-03
22:09:39.000000000 +0200
+++ new/HTTP-BrowserDetect-3.35/xt/author/pod-spell.t 2021-10-19
17:53:58.000000000 +0200
@@ -224,6 +224,7 @@
rkimball
robin
rubylib
+samsung
seamonkey
specialarchiver
staroffice
++++++ cpanspec.yml ++++++
--- /var/tmp/diff_new_pack.SL0nok/_old 2021-10-23 00:52:13.433154397 +0200
+++ /var/tmp/diff_new_pack.SL0nok/_new 2021-10-23 00:52:13.433154397 +0200
@@ -21,3 +21,4 @@
#custom_test: |-
#startserver && make test
#ignore_requires: Bizarre::Module
+skip_doc: precious.toml
