Hello community,
here is the log from the commit of package perl-File-MimeInfo for
openSUSE:Factory checked in at 2018-10-08 17:49:30
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-File-MimeInfo (Old)
and /work/SRC/openSUSE:Factory/.perl-File-MimeInfo.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-File-MimeInfo"
Mon Oct 8 17:49:30 2018 rev:2 rq:640600 version:0.29
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-File-MimeInfo/perl-File-MimeInfo.changes
2017-08-18 15:01:11.553281417 +0200
+++
/work/SRC/openSUSE:Factory/.perl-File-MimeInfo.new/perl-File-MimeInfo.changes
2018-10-08 17:50:56.314062187 +0200
@@ -1,0 +2,27 @@
+Mon Oct 8 09:48:38 UTC 2018 - Dirk Stoecker <opens...@dstoecker.de>
+
+- Fix autogenerated changes
+
+-------------------------------------------------------------------
+Mon Aug 6 05:31:39 UTC 2018 - co...@suse.com
+
+- updated to 0.29
+ see /usr/share/doc/packages/perl-File-MimeInfo/Changes
+
+ 0.29 2018-08-05
+ - Stable release to CPAN.
+
+ 0.28_03 2017-01-22
+ - `mimeinfo --stdin` did not work. Reported by Marius Gavrilescu,
+ Debian bug https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=784545
+ Added minimal tests for `mimeinfo`.
+
+ 0.28_02 2016-12-17
+ - Improved handling of Path::Tiny objects in default method.
+
+ 0.28_01 2016-11-29
+ - Spelling fix courtesy gregor herrmann, Debian Perl group (fixes #25)
+ - Added t/000-report-versions-tiny.t to find out issue with Path::Tiny file
+ handles.
+
+-------------------------------------------------------------------
Old:
----
File-MimeInfo-0.28.tar.gz
New:
----
File-MimeInfo-0.29.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-File-MimeInfo.spec ++++++
--- /var/tmp/diff_new_pack.Nvmj0H/_old 2018-10-08 17:50:56.706061688 +0200
+++ /var/tmp/diff_new_pack.Nvmj0H/_new 2018-10-08 17:50:56.706061688 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-File-MimeInfo
#
-# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2018 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
@@ -12,19 +12,19 @@
# 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/
+# Please submit bugfixes or comments via https://bugs.opensuse.org/
#
Name: perl-File-MimeInfo
-Version: 0.28
+Version: 0.29
Release: 0
%define cpan_name File-MimeInfo
Summary: Determine file type from the file name
-License: Artistic-1.0 or GPL-1.0+
+License: Artistic-1.0 OR GPL-1.0-or-later
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/File-MimeInfo/
-Source0:
http://www.cpan.org/authors/id/M/MI/MICHIELB/%{cpan_name}-%{version}.tar.gz
+Source0:
https://cpan.metacpan.org/authors/id/M/MI/MICHIELB/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
@@ -32,9 +32,12 @@
BuildRequires: perl-macros
BuildRequires: perl(File::BaseDir) >= 0.03
BuildRequires: perl(File::DesktopEntry) >= 0.04
+BuildRequires: perl(Test::More) >= 0.88
%{perl_requires}
# MANUAL BEGIN
+BuildRequires: shared-mime-info
Requires: perl(File::BaseDir) >= 0.03
+Requires: shared-mime-info
# MANUAL END
%description
++++++ File-MimeInfo-0.28.tar.gz -> File-MimeInfo-0.29.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/Changes
new/File-MimeInfo-0.29/Changes
--- old/File-MimeInfo-0.28/Changes 2016-11-27 09:49:59.000000000 +0100
+++ new/File-MimeInfo-0.29/Changes 2018-08-05 11:54:57.000000000 +0200
@@ -2,13 +2,30 @@
Versions up to 0.15 by Jaap Karssenberg <par...@cpan.org>
Versions starting 0.16 by Michiel Beijen <michiel.bei...@gmail.com>
+0.29 2018-08-05
+ - Stable release to CPAN.
+
+0.28_03 2017-01-22
+ - `mimeinfo --stdin` did not work. Reported by Marius Gavrilescu,
+ Debian bug https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=784545
+ Added minimal tests for `mimeinfo`.
+
+0.28_02 2016-12-17
+ - Improved handling of Path::Tiny objects in default method.
+
+0.28_01 2016-11-29
+ - Spelling fix courtesy gregor herrmann, Debian Perl group (fixes #25)
+ - Added t/000-report-versions-tiny.t to find out issue with Path::Tiny file
+ handles.
+
0.28 2016-11-27
- - Follow the current mime-apps-spec (fixes #8, #20)
- The current version of the mime-apps spec locates the per-user defaults
- file in `$XDG_CONFIG_HOME/mimeapps.list`. Use that location, and fall
- back to the per-system and distribution defaults as specified, with the
- previous legacy defaults file as a final fallback.
- Fix by Patrick Burroughs (Celti)
+ - Follow the current mime-apps-spec (fixes #8, #20)
+ The current version of the mime-apps spec locates the per-user defaults
+ file in `$XDG_CONFIG_HOME/mimeapps.list`. Use that location, and fall
+ back to the per-system and distribution defaults as specified, with the
+ previous legacy defaults file as a final fallback.
+ Fix by Patrick Burroughs (Celti)
+ - POD clarifications by Nitish Bezzala
0.27 2015-02-23
- Allow to use mimeinfo on a Path::Tiny object. Reported by Smylers.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/MANIFEST
new/File-MimeInfo-0.29/MANIFEST
--- old/File-MimeInfo-0.28/MANIFEST 2016-11-27 09:54:27.000000000 +0100
+++ new/File-MimeInfo-0.29/MANIFEST 2018-08-05 11:53:30.000000000 +0200
@@ -12,6 +12,7 @@
mimeopen
mimetype
README.md
+t/000-report-versions-tiny.t
t/00_use_ok.t
t/01_normal.t
t/02_magic.t
@@ -23,6 +24,7 @@
t/08_changes.t
t/09_no404s.t
t/10filehandle.t
+t/11mimeinfo.t
t/applications/foo.desktop
t/applications/mimeinfo.cache
t/applications/mirage.desktop
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/MANIFEST.SKIP
new/File-MimeInfo-0.29/MANIFEST.SKIP
--- old/File-MimeInfo-0.28/MANIFEST.SKIP 2016-11-27 09:54:14.000000000
+0100
+++ new/File-MimeInfo-0.29/MANIFEST.SKIP 2018-08-05 11:53:30.000000000
+0200
@@ -7,7 +7,9 @@
^File-MimeInfo-\d
\.bak$
\.tmp$
+\.swp$
^MYMETA
appveyor.yml
+t/symlink
.mailmap
.travis.yml
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/META.json
new/File-MimeInfo-0.29/META.json
--- old/File-MimeInfo-0.28/META.json 2016-11-27 10:47:28.000000000 +0100
+++ new/File-MimeInfo-0.29/META.json 2018-08-05 11:57:10.000000000 +0200
@@ -4,7 +4,7 @@
"Jaap Karssenberg <par...@cpan.org>"
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter
version 2.150005",
+ "generated_by" : "ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter
version 2.150010",
"license" : [
"perl_5"
],
@@ -39,6 +39,11 @@
"requires" : {
"perl" : "5.006001"
}
+ },
+ "test" : {
+ "requires" : {
+ "Test::More" : "0.88"
+ }
}
},
"release_status" : "stable",
@@ -50,7 +55,7 @@
"url" : "https://github.com/mbeijen/File-MimeInfo";
}
},
- "version" : "0.28",
+ "version" : "0.29",
"x_contributors" : [
"Bernhard Rosenkränzer <b...@lindev.ch>",
"Christian Ludwig <chrissic...@gmail.com>",
@@ -60,9 +65,11 @@
"Michiel Beijen <michiel.bei...@gmail.com>",
"Nitish Bezzala <nbezz...@yahoo.com>",
"Patrick Burroughs (Celti) <ce...@celti.name>",
+ "Rudolf Leermakers <rud...@hatsuseno.org>",
"Sean Smith <ssm...@ncsgraphics.com>",
"Stefan Seifert <n...@detonation.org>",
- "brian m. carlson <sand...@crustytoothpaste.net>"
+ "brian m. carlson <sand...@crustytoothpaste.net>",
+ "gregor herrmann <gre...@debian.org>"
],
"x_serialization_backend" : "JSON::PP version 2.27300"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/META.yml
new/File-MimeInfo-0.29/META.yml
--- old/File-MimeInfo-0.28/META.yml 2016-11-27 10:47:28.000000000 +0100
+++ new/File-MimeInfo-0.29/META.yml 2018-08-05 11:57:10.000000000 +0200
@@ -9,10 +9,11 @@
File::BaseDir: '0.03'
File::DesktopEntry: '0.04'
Pod::Usage: '0'
+ Test::More: '0.88'
configure_requires:
ExtUtils::MakeMaker: '6.30'
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter version
2.150005'
+generated_by: 'ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -27,7 +28,7 @@
resources:
bugtracker: https://github.com/mbeijen/File-MimeInfo/issues
repository: https://github.com/mbeijen/File-MimeInfo
-version: '0.28'
+version: '0.29'
x_contributors:
- 'Bernhard Rosenkränzer <b...@lindev.ch>'
- 'Christian Ludwig <chrissic...@gmail.com>'
@@ -37,7 +38,9 @@
- 'Michiel Beijen <michiel.bei...@gmail.com>'
- 'Nitish Bezzala <nbezz...@yahoo.com>'
- 'Patrick Burroughs (Celti) <ce...@celti.name>'
+ - 'Rudolf Leermakers <rud...@hatsuseno.org>'
- 'Sean Smith <ssm...@ncsgraphics.com>'
- 'Stefan Seifert <n...@detonation.org>'
- 'brian m. carlson <sand...@crustytoothpaste.net>'
+ - 'gregor herrmann <gre...@debian.org>'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/Makefile.PL
new/File-MimeInfo-0.29/Makefile.PL
--- old/File-MimeInfo-0.28/Makefile.PL 2016-11-27 09:48:41.000000000 +0100
+++ new/File-MimeInfo-0.29/Makefile.PL 2018-08-05 11:53:30.000000000 +0200
@@ -24,6 +24,9 @@
'CONFIGURE_REQUIRES' => {
"ExtUtils::MakeMaker" => "6.30"
},
+ 'TEST_REQUIRES' => {
+ 'Test::More' => '0.88',
+ },
'LIBS' => [''],
'EXE_FILES' => [ 'mimetype', 'mimeopen' ],
'dist' => {
@@ -50,9 +53,11 @@
'Michiel Beijen <michiel.bei...@gmail.com>',
'Nitish Bezzala <nbezz...@yahoo.com>',
'Patrick Burroughs (Celti) <ce...@celti.name>',
+ 'Rudolf Leermakers <rud...@hatsuseno.org>',
'Sean Smith <ssm...@ncsgraphics.com>',
'Stefan Seifert <n...@detonation.org>',
'brian m. carlson <sand...@crustytoothpaste.net>',
+ 'gregor herrmann <gre...@debian.org>',
],
},
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/lib/File/MimeInfo/Applications.pm
new/File-MimeInfo-0.29/lib/File/MimeInfo/Applications.pm
--- old/File-MimeInfo-0.28/lib/File/MimeInfo/Applications.pm 2016-11-27
09:50:30.000000000 +0100
+++ new/File-MimeInfo-0.29/lib/File/MimeInfo/Applications.pm 2018-08-05
11:55:39.000000000 +0200
@@ -8,7 +8,7 @@
use File::DesktopEntry;
require Exporter;
-our $VERSION = '0.28';
+our $VERSION = '0.29';
our @ISA = qw(Exporter);
our @EXPORT = qw(
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/lib/File/MimeInfo/Magic.pm
new/File-MimeInfo-0.29/lib/File/MimeInfo/Magic.pm
--- old/File-MimeInfo-0.28/lib/File/MimeInfo/Magic.pm 2016-11-27
09:50:30.000000000 +0100
+++ new/File-MimeInfo-0.29/lib/File/MimeInfo/Magic.pm 2018-08-05
11:55:39.000000000 +0200
@@ -17,11 +17,12 @@
our @ISA = qw(Exporter File::MimeInfo);
our @EXPORT = qw(mimetype);
our @EXPORT_OK = qw(extensions describe globs inodetype magic);
-our $VERSION = '0.28';
+our $VERSION = '0.29';
our $DEBUG;
our $_hashed = 0;
-our (@magic_80, @magic, $max_buffer);
+our $max_buffer = 32;
+our (@magic_80, @magic);
# @magic_80 and @magic are used to store the parse tree of magic data
# @magic_80 contains magic rules with priority 80 and higher, @magic the rest
# $max_buffer contains the maximum number of chars to be buffered from a
non-seekable
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/lib/File/MimeInfo/Rox.pm
new/File-MimeInfo-0.29/lib/File/MimeInfo/Rox.pm
--- old/File-MimeInfo-0.28/lib/File/MimeInfo/Rox.pm 2016-11-27
09:50:30.000000000 +0100
+++ new/File-MimeInfo-0.29/lib/File/MimeInfo/Rox.pm 2018-08-05
11:55:39.000000000 +0200
@@ -10,7 +10,7 @@
our @EXPORT = qw(mime_exec mime_system);
our @EXPORT_OK = qw(suggest_script_name);
our %EXPORT_TAGS = (magic => \@EXPORT);
-our $VERSION = '0.28';
+our $VERSION = '0.29';
our @choicespath = (
config_home('rox.sourceforge.net'),
File::Spec->catdir($ENV{HOME}, 'Choices'),
@@ -93,7 +93,7 @@
use File::MimeInfo::Magic;
use File::MimeInfo::Rox qw/:magic/;
- # open some file with the apropriate program
+ # open some file with the appropriate program
mime_system($somefile);
# more verbose version
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/lib/File/MimeInfo.pm
new/File-MimeInfo-0.29/lib/File/MimeInfo.pm
--- old/File-MimeInfo-0.28/lib/File/MimeInfo.pm 2016-11-27 09:50:29.000000000
+0100
+++ new/File-MimeInfo-0.29/lib/File/MimeInfo.pm 2018-08-05 11:55:38.000000000
+0200
@@ -10,7 +10,7 @@
our @ISA = qw(Exporter);
our @EXPORT = qw(mimetype);
our @EXPORT_OK = qw(extensions describe globs inodetype mimetype_canon
mimetype_isa);
-our $VERSION = '0.28';
+our $VERSION = '0.29';
our $DEBUG;
our ($_hashed, $_hashed_aliases, $_hashed_subclasses);
@@ -109,6 +109,15 @@
read FILE, $line, 32;
close FILE;
}
+ elsif (ref $file eq 'Path::Tiny') {
+ return undef unless $file->exists;
+ print STDERR "> File is Path::Tiny object and exists, "
+ . "trying default method\n" if $DEBUG;
+ open my $fh, '<', $file or return undef;
+ binmode FILE, ':utf8' unless $] < 5.008;
+ read $fh, $line, 32;
+ close $fh;
+ }
else {
print STDERR "> Trying default method on object\n" if $DEBUG;
@@ -234,10 +243,11 @@
next if grep {$_ eq $file} @done;
open MAP, '<', $file || croak "Could not open file '$file' for
reading";
binmode MAP, ':utf8' unless $] < 5.008;
- while (<MAP>) {
- next if /^\s*#/ or ! /\S/; # skip comments and empty
lines
- chomp;
- my ($k, $v) = split /\s+/, $_, 2;
+ while (my $line = <MAP>) {
+ next unless $line =~ m/\S/; # skip empty lines
+ next if $line =~ m/^\s*#/; # skip comment lines
+ chomp $line;
+ my ($k, $v) = split m/\s+/, $line, 2;
if ($list) {
$map{$k} = [] unless $map{$k};
push @{$map{$k}}, $v;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/mimeopen
new/File-MimeInfo-0.29/mimeopen
--- old/File-MimeInfo-0.28/mimeopen 2016-11-27 09:50:29.000000000 +0100
+++ new/File-MimeInfo-0.29/mimeopen 2018-08-05 11:55:38.000000000 +0200
@@ -1,7 +1,7 @@
#!/usr/bin/perl
use strict;
-our $VERSION = '0.28';
+our $VERSION = '0.29';
$|++;
# ########## #
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/mimetype
new/File-MimeInfo-0.29/mimetype
--- old/File-MimeInfo-0.28/mimetype 2016-11-27 09:50:29.000000000 +0100
+++ new/File-MimeInfo-0.29/mimetype 2018-08-05 11:55:38.000000000 +0200
@@ -1,7 +1,7 @@
#!/usr/bin/perl
use strict;
-our $VERSION = '0.28';
+our $VERSION = '0.29';
$|++;
# ########## #
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/t/000-report-versions-tiny.t
new/File-MimeInfo-0.29/t/000-report-versions-tiny.t
--- old/File-MimeInfo-0.28/t/000-report-versions-tiny.t 1970-01-01
01:00:00.000000000 +0100
+++ new/File-MimeInfo-0.29/t/000-report-versions-tiny.t 2018-08-05
11:53:30.000000000 +0200
@@ -0,0 +1,77 @@
+use strict;
+use warnings;
+use Test::More 0.88;
+# This is a relatively nice way to avoid Test::NoWarnings breaking our
+# expectations by adding extra tests, without using no_plan. It also helps
+# avoid any other test module that feels introducing random tests, or even
+# test plans, is a nice idea.
+our $success = 0;
+END { $success && done_testing; }
+
+# List our own version used to generate this
+my $v = "\nGenerated by Dist::Zilla::Plugin::ReportVersions::Tiny v1.10\n";
+
+eval { # no excuses!
+ # report our Perl details
+ my $want = '5.006001';
+ $v .= "perl: $] (wanted $want) on $^O from $^X\n\n";
+};
+defined($@) and diag("$@");
+
+# Now, our module version dependencies:
+sub pmver {
+ my ($module, $wanted) = @_;
+ $wanted = " (want $wanted)";
+ my $pmver;
+ eval "require $module;";
+ if ($@) {
+ if ($@ =~ m/Can't locate .* in \@INC/) {
+ $pmver = 'module not found.';
+ } else {
+ diag("${module}: $@");
+ $pmver = 'died during require.';
+ }
+ } else {
+ my $version;
+ eval { $version = $module->VERSION; };
+ if ($@) {
+ diag("${module}: $@");
+ $pmver = 'died during VERSION check.';
+ } elsif (defined $version) {
+ $pmver = "$version";
+ } else {
+ $pmver = '<undef>';
+ }
+ }
+
+ # So, we should be good, right?
+ return sprintf('%-45s => %-10s%-15s%s', $module, $pmver, $wanted, "\n");
+}
+
+eval { $v .= pmver('Carp','any version') };
+eval { $v .= pmver('Exporter','any version') };
+eval { $v .= pmver('Fcntl','any version') };
+eval { $v .= pmver('Pod::Usage','any version') };
+eval { $v .= pmver('File::Spec','0.03') };
+eval { $v .= pmver('File::DesktopEntry','0.04') };
+eval { $v .= pmver('Test::More','0.88') };
+eval { $v .= pmver('Path::Tiny','any version') };
+
+
+# All done.
+$v .= <<'EOT';
+
+Thanks for using my code. I hope it works for you.
+If not, please try and include this output in the bug report.
+That will help me reproduce the issue and solve your problem.
+
+EOT
+
+diag($v);
+ok(1, "we really didn't test anything, just reporting data");
+$success = 1;
+
+# Work around another nasty module on CPAN. :/
+no warnings 'once';
+$Template::Test::NO_FLUSH = 1;
+exit 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-MimeInfo-0.28/t/11mimeinfo.t
new/File-MimeInfo-0.29/t/11mimeinfo.t
--- old/File-MimeInfo-0.28/t/11mimeinfo.t 1970-01-01 01:00:00.000000000
+0100
+++ new/File-MimeInfo-0.29/t/11mimeinfo.t 2018-08-05 11:53:30.000000000
+0200
@@ -0,0 +1,29 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+use File::Spec;
+use FindBin qw($Bin);
+
+eval "use IO::Scalar";
+my $have_io_scalar = !$@;
+
+my $mimetype_file = File::Spec->catfile($Bin, '..', 'mimetype');
+
+my %tests = (
+ 'mimeopen', 'application/x-perl',
+ 't/test.png', 'image/png',
+);
+
+for my $test (sort keys %tests) {
+ my $result = $tests{$test};
+ is(`$^X $mimetype_file --noalign $test`, "$test: $result\n", $test);
+ SKIP: {
+ skip "Skip stdin test because no IO::Scalar", 1 if !$have_io_scalar;
+ is(`$^X $mimetype_file --noalign --stdin < $test`, "STDIN: $result\n",
+ "$test (stdin)");
+ };
+}
+
+done_testing;
