The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
 / 
Test-Smoke-1.82
River stage zero No dependents
/ Test::Smoke::Syncer::Git

Test::Smoke::Syncer::Git

This handles syncing with git repositories.

Test::Smoke::Syncer::Git->new( %args )

Keys for %args:

* gitorigin
* gitdir
* gitbin
* gitbranchfile
* gitdfbranch

$syncer->sync()

Do the actual syncing.

There are 2 repositories, they both need to be updated:

The first (proxy) repository has the github.com/Perl repository as its (origin) remote. The second repository is used to run the smoker from.

For the proxy-repository we do:

git fetch --all
git remote prune origin
git reset --hard origin/$gitbranch

For the working-repository we do:

git clean -dfx
git fetch --all
git reset --hard origin/$gitbranch

$git->get_git_branch()

Reads the first line of the file set in gitbranchfile and returns its value.

COPYRIGHT

(c) 2002-2013, All rights reserved.

* Abe Timmerman <abeltje@cpan.org>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See:

* <http://www.perl.com/perl/misc/Artistic.html>,
* <http://www.gnu.org/copyleft/gpl.html>

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.