Perl Diver 2.31
Main Environment Variables Perl Default Values Perl Config - Summary Perl Config - Full Installed Modules List Directory uptime Docs

Module Documentation
Details and documentation about a specific module, including version and documentation (if available). Note that while links to perldoc.com and search.cpan.org are provided, the module may be part of a larger distribution. If you reach a File Not Found page on either site, please try the parent module.

Git::SVN::Fetcher

Name Git::SVN::Fetcher
Version
Located at /usr/share/perl5/vendor_perl
File /usr/share/perl5/vendor_perl/Git/SVN/Fetcher.pm
Is Core No
Search CPAN for this module Git::SVN::Fetcher
Documentation Git::SVN::Fetcher
Module Details Git::SVN::Fetcher

NAME

Git::SVN::Fetcher - tree delta consumer for ``git svn fetch''


SYNOPSIS

    use SVN::Core;
    use SVN::Ra;
    use Git::SVN;
    use Git::SVN::Fetcher;
    use Git;
    my $gs = Git::SVN->find_by_url($url);
    my $ra = SVN::Ra->new(url => $url);
    my $editor = Git::SVN::Fetcher->new($gs);
    my $reporter = $ra->do_update($SVN::Core::INVALID_REVNUM, '',
                                  1, $editor);
    $reporter->set_path('', $old_rev, 0);
    $reporter->finish_report;
    my $tree = $gs->tmp_index_do(sub { command_oneline('write-tree') });
    foreach my $path (keys %{$editor->{dir_prop}) {
        my $props = $editor->{dir_prop}{$path};
        foreach my $prop (keys %$props) {
            print "property $prop at $path changed to $props->{$prop}\n";
        }
    }
    foreach my $path (keys %{$editor->{empty}) {
        my $action = $editor->{empty}{$path} ? 'added' : 'removed';
        print "empty directory $path $action\n";
    }
    foreach my $path (keys %{$editor->{file_prop}) { ... }
    foreach my $parent (keys %{$editor->{absent_dir}}) {
        my @children = @{$editor->{abstent_dir}{$parent}};
        print "cannot fetch directory $parent/$_: not authorized?\n"
            foreach @children;
    }
    foreach my $parent (keys %{$editor->{absent_file}) { ... }


DESCRIPTION

This is a subclass of SVN::Delta::Editor, which means it implements callbacks to act as a consumer of Subversion tree deltas. This particular implementation of those callbacks is meant to store information about the resulting content which git svn fetch could use to populate new commits and new entries for unhandled.log. More specifically:

The interface is unstable. Do not use this module unless you are developing git-svn.


DEPENDENCIES

the SVN::Delta manpage from the Subversion perl bindings, the core Carp and the File::Basename manpage modules, and git's Git helper module.

Git::SVN::Fetcher has not been tested using callers other than git-svn itself.


SEE ALSO

the SVN::Delta manpage, the Git::SVN::Editor manpage.


INCOMPATIBILITIES

None reported.


BUGS

None.

Perl Diver brought to you by ScriptSolutions.com © 1997- 2024