minor hgk fixes
authormpm@selenic.com
Wed, 08 Jun 2005 13:06:46 -0800
changeset 283 18c9566ad717
parent 282 97d83e7fbf2f
child 284 d7c2efd0b541
minor hgk fixes -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 minor hgk fixes From: Chris Mason <mason@suse.com> 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-----
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"