summaryrefslogtreecommitdiff
path: root/git-cvsimport-script
diff options
context:
space:
mode:
authorSven Verdoolaege <skimo@kotnet.org>2005-07-04 15:36:25 (GMT)
committerSven Verdoolaege <skimo@kotnet.org>2005-07-04 15:36:25 (GMT)
commit175011320690864d1483e7eec19da7f71d14dad7 (patch)
treede460f7ace40c426fe424c8e2bf37ebed90467c8 /git-cvsimport-script
parent28537171e7ec23c8677ea6e77c208583f95caa28 (diff)
downloadgit-175011320690864d1483e7eec19da7f71d14dad7.zip
git-175011320690864d1483e7eec19da7f71d14dad7.tar.gz
git-175011320690864d1483e7eec19da7f71d14dad7.tar.bz2
git-cvsimport-script: more error handling
Diffstat (limited to 'git-cvsimport-script')
-rwxr-xr-xgit-cvsimport-script5
1 files changed, 3 insertions, 2 deletions
diff --git a/git-cvsimport-script b/git-cvsimport-script
index 9773891..7f93fb3 100755
--- a/git-cvsimport-script
+++ b/git-cvsimport-script
@@ -408,6 +408,7 @@ unless(-d $git_dir) {
# populate index
system('git-read-tree', $last_branch);
+ die "read-tree failed: $?\n" if $?;
# Get the last import timestamps
opendir(D,"$git_dir/refs/heads");
@@ -510,8 +511,8 @@ my $commit = sub {
print "Parent ID $parent\n" if $opt_v;
}
- my $pr = IO::Pipe->new();
- my $pw = IO::Pipe->new();
+ my $pr = IO::Pipe->new() or die "Cannot open pipe: $!\n";
+ my $pw = IO::Pipe->new() or die "Cannot open pipe: $!\n";
$pid = fork();
die "Fork: $!\n" unless defined $pid;
unless($pid) {