Skip to content

Commit

Permalink
cvsimport: replace anonymous sub ref with a normal sub
Browse files Browse the repository at this point in the history
commit() does not need to be an anonymous subreference. Keep it simple.

Signed-off-by: Martin Langhoff <martin@catalyst.net.nz>
Signed-off-by: Junio C Hamano <junkio@cox.net>
  • Loading branch information
Martin Langhoff authored and Junio C Hamano committed May 23, 2006
1 parent f396f01 commit c4b16f8
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions git-cvsimport.perl
Original file line number Diff line number Diff line change
Expand Up @@ -563,7 +563,7 @@ ($$)

my($patchset,$date,$author_name,$author_email,$branch,$ancestor,$tag,$logmsg);
my(@old,@new,@skipped);
my $commit = sub {
sub commit {
my $pid;
while(@old) {
my @o2;
Expand Down Expand Up @@ -852,7 +852,7 @@ ($$)
} elsif($state == 9 and /^\s*$/) {
$state = 10;
} elsif(($state == 9 or $state == 10) and /^-+$/) {
&$commit();
commit();
$state = 1;
} elsif($state == 11 and /^-+$/) {
$state = 1;
Expand All @@ -862,7 +862,7 @@ ($$)
print "* UNKNOWN LINE * $_\n";
}
}
&$commit() if $branch and $state != 11;
commit() if $branch and $state != 11;
unlink($git_index);
Expand Down

0 comments on commit c4b16f8

Please sign in to comment.