# HG changeset patch
# User Steve Borho <steve@borho.org>
# Date 1189022039 -7200
# Node ID f8c36b215281a7e8f3aaed632206d3627ee21e6e
# Parent  4fe04b183fd83ec6ba9b8c8f014329064761e36c
hgk: add repo root to window title

diff -r 4fe04b183fd8 -r f8c36b215281 contrib/hgk
--- a/contrib/hgk	Tue Sep 04 18:37:28 2007 +0200
+++ b/contrib/hgk	Wed Sep 05 21:53:59 2007 +0200
@@ -3755,4 +3755,6 @@
 setcoords
 makewindow
 readrefs
+set hgroot [exec $env(HG) root]
+wm title . "hgk $hgroot"
 getcommits $revtreeargs