diff options
author | Ask Bjørn Hansen <ask@develooper.com> | 2007-11-06 02:54:01 -0800 |
---|---|---|
committer | Junio C Hamano <gitster@pobox.com> | 2007-11-07 11:39:37 -0800 |
commit | 6aaa65da20a8f0a4c95834f73f0b20d5dc3aa3c6 (patch) | |
tree | 156dad9dfff5d084d723999ef99536543ffa3233 /perl | |
parent | f49439e1e16713d8d531e8a0bbc3b0bd7df5a407 (diff) | |
download | git-6aaa65da20a8f0a4c95834f73f0b20d5dc3aa3c6.tar.gz |
When exec() fails include the failing command in the error message
git-svn occasionally fails with no details as to what went wrong - this should help debug those situations.
Signed-off-by: Ask Bjørn Hansen <ask@develooper.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'perl')
-rw-r--r-- | perl/Git.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Git.pm b/perl/Git.pm index 3f4080cbf8..dca92c8adb 100644 --- a/perl/Git.pm +++ b/perl/Git.pm @@ -812,7 +812,7 @@ sub _cmd_exec { $self->wc_subdir() and chdir($self->wc_subdir()); } _execv_git_cmd(@args); - die "exec failed: $!"; + die qq[exec "@args" failed: $!]; } # Execute the given Git command ($_[0]) with arguments ($_[1..]) |