Documentation: pack-refs --all vs default behaviour
[gitweb.git] / gitk
diff --git a/gitk b/gitk
index 3dabc695167dc33c6655efbabbd9a0c3e870ccda..031c829f267d5926ebdf689fea1d8cc1c79cb141 100755 (executable)
--- a/gitk
+++ b/gitk
@@ -12,7 +12,7 @@ proc gitdir {} {
     if {[info exists env(GIT_DIR)]} {
        return $env(GIT_DIR)
     } else {
-       return ".git"
+       return [exec git rev-parse --git-dir]
     }
 }
 
@@ -6293,6 +6293,7 @@ set stuffsaved 0
 set patchnum 0
 setcoords
 makewindow
+wm title . "[file tail $argv0]: [file tail [pwd]]"
 readrefs
 
 if {$cmdline_files ne {} || $revtreeargs ne {}} {