The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

SVK::Mirror -

SYNOPSIS

    # setup a new mirror
    my $mirror = SVK::Mirror->create( { backend => 'SVNRa',  url => 'http://server/',
                                        backend_options => {}, repos => $repos, path => '/mirror' } );
    # load existing mirror
    my $existing = SVK::Mirror->load( { path => $path, repos => $repos } );

    $mirror->mirror_changesets();

    $mirror->traverse_changesets( sub { $revs_to_mirror++ } );

DESCRIPTION

create
load

METHODS

detach
bootstrap
relocate($newurl)
with_lock($code)
find_changeset($localrev)

Returns an opaque object that sync_changeset understands.

find_rev_from_changeset($remote_identifier)
traverse_new_changesets($code)

calls $code with an opaque object and metadata that sync_changeset understands.

sync_changeset($changeset, $metadata)
mirror_changesets
get_commit_editor
url