tig.pl: Fix running in subdirectories.

diff --git a/tig.pl b/tig.pl
index d7272a3183981ad8040d2c963f9f6fe1a4e03bf5..c5648a81c321589dde508ad92586aebc8de2c7e0 100755 (executable)
--- a/tig.pl
+++ b/tig.pl
@@ -34,6 +34,14 @@ my $color_ref_reference = 'red bold';
 my $color_author        = 'magenta';
 
 
+# Aliases in Git with "! ..." are always run in the top-level-directory.
+# GIT_PREFIX contains the relative path to the current subdirectory. Thanks to
+# dr_lepper in #git on Freenode (2013-04-03 23:17) for telling me about
+# GIT_PREFIX.
+if (defined $ENV{GIT_PREFIX} and $ENV{GIT_PREFIX} ne '') {
+    chdir $ENV{GIT_PREFIX} or die $!;
+}
+
 my $format = '%x00'         # separator from --graph
            . '%h'  . '%x00' # abbreviated commit hash
            . '%at' . '%x00' # author date