--- a/contrib/hgk	Sun Mar 23 16:07:27 2008 +0100
+++ b/contrib/hgk	Sun Mar 23 18:52:02 2008 +0100
@@ -2339,8 +2339,12 @@
 
     $cflist delete 0 end
     $cflist insert end "Comments"
+    if {$nparents($id) <= 1} {
+    set parent "null"
     if {$nparents($id) == 1} {
-	startdiff [concat $id $parents($id)]
+        set parent $parents($id)
+    }
+	startdiff [concat $id $parent]
     } elseif {$nparents($id) > 1} {
 	mergediff $id
     }