view release on metacpan or  search on metacpan

lib/Fedora/App/MaintainerTools/LocalRepo.pm  view on Meta::CPAN

sub _build__files { grep { !$_->is_dir && /\.rpm$/ } shift->local_dir->children }
sub _build__new_files { [ ] }

sub _build_is_local_updated  { 0 }
sub _build_is_remote_updated { 0 }

#############################################################################
#

sub update_local {
	my $self = shift @_;
	my %opts = @_;

	my $x = $self->_new_files;
	### $x

	return unless $self->has_new_files;

	$self->log->info('Regenerating local metadata');

lib/Fedora/App/MaintainerTools/LocalRepo.pm  view on Meta::CPAN

	cp "$_" => "$dir" for $self->new_files;

	# regenerate local metadata
	my $cmd = "cd $dir && createrepo --update .";
	$self->log->debug("Executing: $cmd");
    system $cmd;

	return;
}

sub update_remote {
	my $self = shift @_;
	my %opts = @_;

	$self->log->info('Updating local repo and pushing...');

	$self->update_local;
	$self->_push_new_files;
	$self->_push_new_metadata;

	# now, reset ourself...