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

cvsimport: minor fixups

Browse Source 
Cleanup @skipped after it's used. Close a fhandle.
Removing suspects one at a time.

Signed-off-by: Martin Langhoff <martin@catalyst.net.nz>
Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:
Martin Langhoff 2006-05-23 00:45:47 +12:00 committed by Junio C Hamano
parent f803eec51b
commit f396f01f11
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
git-cvsimport.perl
View File

@ -650,6 +650,8 @@ my $commit = sub {
"GIT_COMMITTER_DATE=".strftime("+0000 %Y-%m-%d %H:%M:%S",gmtime($date)), "GIT_COMMITTER_DATE=".strftime("+0000 %Y-%m-%d %H:%M:%S",gmtime($date)),
"git-commit-tree", $tree,@par); "git-commit-tree", $tree,@par);
die "Cannot exec git-commit-tree: $!\n"; die "Cannot exec git-commit-tree: $!\n";
close OUT;
} }
$pw->writer(); $pw->writer();
$pr->reader(); $pr->reader();
@ -661,6 +663,7 @@ my $commit = sub {
if (@skipped) { if (@skipped) {
$logmsg .= "\n\n\nSKIPPED:\n\t"; $logmsg .= "\n\n\nSKIPPED:\n\t";
$logmsg .= join("\n\t", @skipped) . "\n"; $logmsg .= join("\n\t", @skipped) . "\n";
@skipped = ();
} }
print $pw "$logmsg\n" print $pw "$logmsg\n"