# HG changeset patch # User mpm@selenic.com # Date 1118264806 28800 # Node ID 18c9566ad717c7c0a51b4e794676f4e4deab90e6 # Parent 97d83e7fbf2f5f463e27a45ebc0c81e433f2a478 minor hgk fixes -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 minor hgk fixes From: Chris Mason hgk was missing the last commit when reading the output from hgit rev-list -c Some how a debugging puts snuck into the hgk I sent out. Remove it: manifest hash: cc0ec1d46fbbe9b7e9bf6404f9dbe2ec787811ba -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.0 (GNU/Linux) iD8DBQFCp13mywK+sNU5EO8RAnkqAJ49W/i1mwt38Yws4t0mEQeKttsOSQCgi9fS /t42Uy0Qj9yeVppGPLel/bI= =eIrI -----END PGP SIGNATURE----- diff --git a/contrib/hgk b/contrib/hgk --- a/contrib/hgk +++ b/contrib/hgk @@ -139,6 +139,9 @@ proc getallcommitline {commfd} { # 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 @@ proc gettreediffs {id} { 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"