--- a/contrib/hgk Wed Jun 08 11:01:18 2005 -0800
+++ b/contrib/hgk Wed Jun 08 13:06:46 2005 -0800
@@ -139,6 +139,9 @@
# this works around what is apparently a bug in Tcl...
fconfigure $commfd -blocking 1
if {![catch {close $commfd} err]} {
+ if {$allcommitstate == "indent"} {
+ readonecommit $curcommitid $curcommit
+ }
after idle drawgraph
return
}
@@ -1164,7 +1167,6 @@
set treepending $id
set treediffs($id) {}
set p [lindex $parents($id) 0]
- puts stderr "hgit diff-tree -r $p $id"
if [catch {set gdtf [open "|hgit diff-tree -r $p $id" r]}] return
fconfigure $gdtf -blocking 0
fileevent $gdtf readable "gettreediffline $gdtf $id"