git-gui i18n: internationalize use of colon punctuation
Internationalize use of colon punctuation ':' in options window, windows titles, database statistics window. Some languages might use a different style, for instance French uses "User Name :" (space before colon). Signed-off-by: Vasco Almeida <vascomalmeida@sapo.pt> Signed-off-by: Pat Thoyts <patthoyts@users.sourceforge.net>
Vasco Almeida committed
May 8, 2016 at 10:52 UTC
eca963683c13e0fea80da57f15489bb7204b0b62
4 files changed
+7
-7
lib/branch_delete.tcl
+1
-1
@@ -128,7 +128,7 @@ method _delete {} {
128
set b [lindex $i 0]
129
set o [lindex $i 1]
130
if {[catch {git branch -D $b} err]} {
131
- append failed " - $b: $err\n"
131
+ append failed [mc " - %s:" $b] " $err\n"
132
}
133
}
134
lib/database.tcl
+1
-1
@@ -54,7 +54,7 @@ proc do_stats {} {
54
set value "$value[lindex $s 2]"
55
}
56
57
- ${NS}::label $w.stat.l_$name -text "$label:" -anchor w
57
+ ${NS}::label $w.stat.l_$name -text [mc "%s:" $label] -anchor w
58
${NS}::label $w.stat.v_$name -text $value -anchor w
59
grid $w.stat.l_$name $w.stat.v_$name -sticky we -padx {0 5}
60
}
lib/error.tcl
+1
-1
@@ -113,7 +113,7 @@ proc hook_failed_popup {hook msg {is_fatal 1}} {
113
114
bind $w <Visibility> "grab $w; focus $w"
115
bind $w <Key-Return> "destroy $w"
116
- wm title $w [strcat "[appname] ([reponame]): " [mc "error"]]
116
+ wm title $w [mc "%s (%s): error" [appname] [reponame]]
117
wm deiconify $w
118
tkwait window $w
119
}
lib/option.tcl
+4
-4
@@ -179,7 +179,7 @@ proc do_options {} {
179
i-* {
180
regexp -- {-(\d+)\.\.(\d+)$} $type _junk min max
181
${NS}::frame $w.$f.$optid
182
- ${NS}::label $w.$f.$optid.l -text "$text:"
182
+ ${NS}::label $w.$f.$optid.l -text [mc "%s:" $text]
183
pack $w.$f.$optid.l -side left -anchor w -fill x
184
tspinbox $w.$f.$optid.v \
185
-textvariable ${f}_config_new($name) \
@@ -194,7 +194,7 @@ proc do_options {} {
194
c -
195
t {
196
${NS}::frame $w.$f.$optid
197
- ${NS}::label $w.$f.$optid.l -text "$text:"
197
+ ${NS}::label $w.$f.$optid.l -text [mc "%s:" $text]
198
${NS}::entry $w.$f.$optid.v \
199
-width 20 \
200
-textvariable ${f}_config_new($name)
@@ -217,7 +217,7 @@ proc do_options {} {
217
s {
218
set opts [eval [lindex $option 3]]
219
${NS}::frame $w.$f.$optid
220
- ${NS}::label $w.$f.$optid.l -text "$text:"
220
+ ${NS}::label $w.$f.$optid.l -text [mc "%s:" $text]
221
if {$use_ttk} {
222
ttk::combobox $w.$f.$optid.v \
223
-textvariable ${f}_config_new($name) \
@@ -279,7 +279,7 @@ proc do_options {} {
279
[font configure $font -size]
280
281
${NS}::frame $w.global.$name
282
- ${NS}::label $w.global.$name.l -text "$text:"
282
+ ${NS}::label $w.global.$name.l -text [mc "%s:" $text]
283
${NS}::button $w.global.$name.b \
284
-text [mc "Change Font"] \
285
-command [list \