MDV-Distribconf
view release on metacpan or search on metacpan
lib/MDV/Distribconf/MediaCFG.pm view on Meta::CPAN
No documentation
=cut
$value->{cdmode} = { section => 'media_info' };
=head3 cdmode
If set, indexes located into global directory should be used
instead of per media ones.
=cut
$value->{'synthesis-filter'} = { section => 'media_info' };
=head3 synthesis-filter
Compression filter used for synthesis
=cut
$value->{'xml-info'} = { section => 'media_info' };
=head3 xml-info
The distribution handle xml format
=cut
$value->{'xml-info-filter'} = { section => 'media_info' };
=head3 xml-info-filter
Compression filter used for xml-info
=cut
=head2 MEDIA VALUES
=cut
foreach (qw(hdlist name synthesis pubkey media_info)) {
$value->{$_} = { };
}
=head3 name
The name of the media. If unset, the section is the name.
=head3 hdlist
The hdlist file holding rpm infos for the media
=head3 synthesis
The synthesis file holding rpm infos for the media
=head3 pubkey
The file holding public gpg key used to sign rpms in this media.
=cut
=head3 media_type
Contains a comma-separated list of tags meant to help tools to better
describe the media
=cut
$value->{srpms} = { deny => 'rpms', cross => 'rpms', ismedialist => 1 };
=head3 srpms
If the media hold binaries rpms, this parameter contains
the list of medias holding corresponding sources rpms.
=cut
$value->{rpms} = { deny => 'srpms', cross => 'srpms', ismedialist => 1 };
=head3 rpms
If the media hold sources rpms, this parameter contains
the list of media holding binaries rpms build by srpms from this media.
=cut
$value->{updates_for} = { ismedialist => 1 };
=head3 updates_for
If the media contain updates, it contain the list of media for which
rpms are updates.
=cut
$value->{debug_for} = { ismedialist => 1 };
=head3 debug_for
If the media contain debug rpms, it contain the list of media for which
rpms are debug rpms.
=cut
$value->{noauto} = {};
=head3 noauto
This value is used by tools to assume if the media should automatically
added to the config (urpmi).
=cut
$value->{size} = {
validation => sub {
my ($v) = @_;
if ($v =~ /^(\d+)(\w)?$/) {
if ($2) {
( run in 0.706 second using v1.01-cache-2.11-cpan-df04353d9ac )