From patchwork Sun Mar 10 16:24:43 2013
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Subject: [2,of,9] hgk: reformat changsets fields
From: Andrew Shadura <bugzilla@tut.by>
X-Patchwork-Id: 1101
Message-Id: <345843b419ed0c99d0f5.1362932683@localhost.localdomain>
To: mercurial-devel@selenic.com
Cc: bugzilla@tut.by
Date: Sun, 10 Mar 2013 17:24:43 +0100

# HG changeset patch
# User Andrew Shadura <bugzilla@tut.by>
# Date 1362928077 -3600
# Node ID 345843b419ed0c99d0f580140b4d48716d4c146f
# Parent  e1df8b371fd94d71fb41bfd56a606572e3a1fa52
hgk: reformat changsets fields

Rename Author to User.
Rename Revision to Changeset.
Put Date on its own line.

diff --git a/contrib/hgk b/contrib/hgk
--- a/contrib/hgk
+++ b/contrib/hgk
@@ -2471,11 +2471,12 @@ proc selectline {l isnew} {
     $ctext mark set fmark.0 0.0
     $ctext mark gravity fmark.0 left
     set info $commitinfo($id)
-    $ctext insert end "Revision: [lindex $info 6]\n"
+    $ctext insert end "Changeset: [lindex $info 6]\n"
     if {[llength [lindex $info 7]] > 0} {
         $ctext insert end "Branch: [lindex $info 7]\n"
     }
-    $ctext insert end "Author: [lindex $info 1]  [lindex $info 2]\n"
+    $ctext insert end "User: [lindex $info 1]\n"
+    $ctext insert end "Date: [lindex $info 2]\n"
     if {[info exists idbookmarks($id)]} {
 	$ctext insert end "Bookmarks:"
 	foreach bookmark $idbookmarks($id) {
@@ -3600,7 +3601,7 @@ proc lineclick {x y id isnew} {
     $ctext tag bind link0 <1> [list selbyid $id]
     set info $commitinfo($id)
     $ctext insert end "\n\t[lindex $info 0]\n"
-    $ctext insert end "\tAuthor:\t[lindex $info 1]\n"
+    $ctext insert end "\tUser:\t[lindex $info 1]\n"
     $ctext insert end "\tDate:\t[lindex $info 2]\n"
     if {[info exists children($id)]} {
 	$ctext insert end "\nChildren:"
@@ -3612,7 +3613,7 @@ proc lineclick {x y id isnew} {
 	    $ctext insert end $child [list link link$i]
 	    $ctext tag bind link$i <1> [list selbyid $child]
 	    $ctext insert end "\n\t[lindex $info 0]"
-	    $ctext insert end "\n\tAuthor:\t[lindex $info 1]"
+	    $ctext insert end "\n\tUser:\t[lindex $info 1]"
 	    $ctext insert end "\n\tDate:\t[lindex $info 2]\n"
 	}
     }