[PATCH 2 of 9] hgk: drop committer field from the UI
Andrew Shadura
bugzilla at tut.by
Wed Nov 7 14:06:44 CST 2012
# HG changeset patch
# User Andrew Shadura <bugzilla at tut.by>
# Date 1350392861 -7200
# Node ID 044daf521837ed3a5f71b181da5478fb721d6ef7
# Parent 46f82a274b23f71b57efc5a22f3e3e19177be0d1
hgk: drop committer field from the UI
Remove Committer field, it doesn't make sense in Hg; rename
Author and Revision, put Date on its own line.
diff --git a/contrib/hgk b/contrib/hgk
--- a/contrib/hgk
+++ b/contrib/hgk
@@ -637,7 +637,7 @@ proc makewindow {} {
findtype Exact IgnCase Regexp]
set findloc "All fields"
ttk::optionMenu .ctop.top.bar.findloc findloc "All fields" Headline \
- Comments Author Committer Files Pickaxe
+ Comments Author Files Pickaxe
pack .ctop.top.bar.findloc -side right
pack .ctop.top.bar.findtype -side right
# for making sure type==Exact whenever loc==Pickaxe
@@ -1924,7 +1924,7 @@ proc dofind {} {
set oldsel $selectedline
}
set didsel 0
- set fldtypes {Headline Author Date Committer CDate Comment}
+ set fldtypes {Headline Author Date CDate Comment}
for {set l 0} {$l < $numcommits} {incr l} {
set id $lineid($l)
set info $commitinfo($id)
@@ -2466,12 +2466,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 "Committer: [lindex $info 3] [lindex $info 4]\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) {
More information about the Mercurial-devel
mailing list