contrib/hgk
changeset 5284 f8c36b215281
parent 5117 d4fa6bafc43a
child 5392 66d7aabf5b41
--- a/contrib/hgk
+++ b/contrib/hgk
@@ -3755,4 +3755,6 @@ set patchnum 0
 setcoords
 makewindow
 readrefs
+set hgroot [exec $env(HG) root]
+wm title . "hgk $hgroot"
 getcommits $revtreeargs