aboutsummaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorRichard Hartmann <richih.mailinglist@gmail.com>2008-12-22 00:17:32 +0100
committerJunio C Hamano <gitster@pobox.com>2008-12-21 18:46:41 -0800
commitf66bc5f928194366ee5eb78ef18a3562fb1bb7cf (patch)
tree02bcca832db8ef7b86094b5cbb5fc11df9d02634 /perl
parent5fdb70983585ccde1540563a8c7458621f7a7407 (diff)
downloadgit-f66bc5f928194366ee5eb78ef18a3562fb1bb7cf.tar.gz
git-f66bc5f928194366ee5eb78ef18a3562fb1bb7cf.tar.xz
Always show which directory is not a git repository
Unify all fatal: Not a git repository error messages so they include path information. Signed-off-by: Richard Hartmann <richih@net.in.tum.de> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'perl')
-rw-r--r--perl/Git.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl/Git.pm b/perl/Git.pm
index dde9105df..8392a6833 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -204,14 +204,14 @@ sub repository {
unless (-d "$dir/refs" and -d "$dir/objects" and -e "$dir/HEAD") {
# Mimick git-rev-parse --git-dir error message:
- throw Error::Simple('fatal: Not a git repository');
+ throw Error::Simple("fatal: Not a git repository: $dir");
}
my $search = Git->repository(Repository => $dir);
try {
$search->command('symbolic-ref', 'HEAD');
} catch Git::Error::Command with {
# Mimick git-rev-parse --git-dir error message:
- throw Error::Simple('fatal: Not a git repository');
+ throw Error::Simple("fatal: Not a git repository: $dir");
}
$opts{Repository} = abs_path($dir);