diff options
author | Sven Verdoolaege <skimo@kotnet.org> | 2005-07-04 17:36:25 +0200 |
---|---|---|
committer | Sven Verdoolaege <skimo@kotnet.org> | 2005-07-04 17:36:25 +0200 |
commit | 175011320690864d1483e7eec19da7f71d14dad7 (patch) | |
tree | de460f7ace40c426fe424c8e2bf37ebed90467c8 | |
parent | git-cvsimport-script: provide direct support for cvsps -z option (diff) | |
download | tgif-175011320690864d1483e7eec19da7f71d14dad7.tar.xz |
git-cvsimport-script: more error handling
-rwxr-xr-x | git-cvsimport-script | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/git-cvsimport-script b/git-cvsimport-script index 9773891b5d..7f93fb3cd7 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) { |