undef/git-commit-vandalism
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

git-svn: just use Digest::MD5 instead of requiring it

Browse Source 
Historically, git-svn did not always use Digest::MD5 because
it did not use the SVN::Delta::Editor interfaces.  Nowadays
it does, and the requires make strace more noisy.

Signed-off-by: Eric Wong <normalperson@yhbt.net>
This commit is contained in:
Eric Wong 2007-01-29 16:27:08 -08:00
parent 24e22aa8a5
commit 90c1b15da3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
git-svn.perl
View File

@ -1577,6 +1577,7 @@ use strict;
use warnings; use warnings;
use Carp qw/croak/; use Carp qw/croak/;
use IO::File qw//; use IO::File qw//;
use Digest::MD5;
# file baton members: path, mode_a, mode_b, pool, fh, blob, base # file baton members: path, mode_a, mode_b, pool, fh, blob, base
sub new { sub new {
@ -1590,7 +1591,6 @@ sub new {
$self->{absent_dir} = {}; $self->{absent_dir} = {};
$self->{absent_file} = {}; $self->{absent_file} = {};
$self->{gii} = $git_svn->tmp_index_do(sub { Git::IndexInfo->new }); $self->{gii} = $git_svn->tmp_index_do(sub { Git::IndexInfo->new });
require Digest::MD5;
$self; $self;
} }
@ -1798,6 +1798,7 @@ use strict;
use warnings; use warnings;
use Carp qw/croak/; use Carp qw/croak/;
use IO::File; use IO::File;
use Digest::MD5;
sub new { sub new {
my ($class, $opts) = @_; my ($class, $opts) = @_;
@ -1826,7 +1827,6 @@ sub new {
$self->{rm} = { }; $self->{rm} = { };
$self->{path_prefix} = length $self->{svn_path} ? $self->{path_prefix} = length $self->{svn_path} ?
"$self->{svn_path}/" : ''; "$self->{svn_path}/" : '';
require Digest::MD5;
return $self; return $self;
} }