cpet/openbsd-ports
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

discover update-mime-database tag

Browse Source
This commit is contained in:
espie 2018-07-11 10:43:03 +00:00
parent 2deef80916
commit 3e45c20244
2 changed files with 25 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
infrastructure/bin/update-plist
View File

@ -1,5 +1,5 @@
#! /usr/bin/perl
# $OpenBSD: update-plist,v 1.166 2018/07/08 19:57:43 espie Exp $
# $OpenBSD: update-plist,v 1.167 2018/07/11 10:43:03 espie Exp $
# Copyright (c) 2018 Marc Espie <espie@openbsd.org>
#
# Permission to use, copy, modify, and distribute this software for any
@ -806,6 +806,14 @@ sub check_specific
$h->{should}{'glib-compile-schemas'} = 1;
}
package OpenBSD::PackingElement::MimeInfo;
our @ISA=qw(OpenBSD::PackingElement::File);
sub check_specific
{
my ($self, $h) = @_;
$h->{should}{'update-mime-database'} = 1;
}
package OpenBSD::PackingElement::Sampledir;
# this is not really smart, but good enough for starters
@ -1229,7 +1237,7 @@ sub new
{
my $class = shift;
bless {
state => UpdatePlist::State->new('update-plist'),
state => UpdatePlist::State->new,
}, $class;
}

16
infrastructure/lib/OpenBSD/FS2.pm
View File

@ -1,4 +1,4 @@
# $OpenBSD: FS2.pm,v 1.24 2018/07/08 19:39:33 espie Exp $
# $OpenBSD: FS2.pm,v 1.25 2018/07/11 10:43:03 espie Exp $
# Copyright (c) 2018 Marc Espie <espie@openbsd.org>
#
# Permission to use, copy, modify, and distribute this software for any
@ -63,6 +63,7 @@ sub classes
return (qw(OpenBSD::FS::File::Directory OpenBSD::FS::File::Rc
OpenBSD::FS::File::Desktop
OpenBSD::FS::File::Glib2Schema
OpenBSD::FS::File::MimeInfo
OpenBSD::FS::File::Subinfo OpenBSD::FS::File::Info
OpenBSD::FS::File::Dirinfo OpenBSD::FS::File::Manpage
OpenBSD::FS::File::Library OpenBSD::FS::File::Plugin
@ -169,6 +170,19 @@ sub element_class
'OpenBSD::PackingElement::Glib2Schema';
}
package OpenBSD::FS::File::MimeInfo;
our @ISA = qw(OpenBSD::FS::File);
sub recognize
{
my ($class, $filename, $fs) = @_;
return $filename =~ m,share/mime/packages/.*\.xml$,;
}
sub element_class
{
'OpenBSD::PackingElement::MimeInfo';
}
package OpenBSD::FS::File::Binary;
our @ISA = qw(OpenBSD::FS::File);