Merge tag 'gitgui-0.21.0' of git://repo.or.cz/git-gui
git-gui 0.21.0 * tag 'gitgui-0.21.0' of git://repo.or.cz/git-gui: (22 commits) git-gui: set version 0.21 git-gui: Mark 'All' in remote.tcl for translation git-gui i18n: Updated Bulgarian translation (565,0f,0u) git-gui: avoid persisting modified author identity git-gui: handle the encoding of Git's output correctly git-gui: unicode file name support on windows git-gui: Update Russian translation git-gui: maintain backwards compatibility for merge syntax git-gui i18n: mark string in lib/error.tcl for translation git-gui: fix incorrect use of Tcl append command git-gui i18n: mark "usage:" strings for translation git-gui i18n: internationalize use of colon punctuation git-gui: ensure the file in the diff pane is in the list of selected files git-gui: support for $FILENAMES in tool definitions git-gui: fix initial git gui message encoding git-gui/po/glossary/txt-to-pot.sh: use the $( ... ) construct for command substitution git-gui (Windows): use git-gui.exe in `Create Desktop Shortcut` git-gui: fix detection of Cygwin Amend tab ordering and text widget border and highlighting. Allow keyboard control to work in the staging widgets. ...
This commit is contained in:
@ -17,7 +17,7 @@ proc error_popup {msg} {
|
||||
set cmd [list tk_messageBox \
|
||||
-icon error \
|
||||
-type ok \
|
||||
-title [append "$title: " [mc "error"]] \
|
||||
-title [mc "%s: error" $title] \
|
||||
-message $msg]
|
||||
if {[winfo ismapped [_error_parent]]} {
|
||||
lappend cmd -parent [_error_parent]
|
||||
@ -33,7 +33,7 @@ proc warn_popup {msg} {
|
||||
set cmd [list tk_messageBox \
|
||||
-icon warning \
|
||||
-type ok \
|
||||
-title [append "$title: " [mc "warning"]] \
|
||||
-title [mc "%s: warning" $title] \
|
||||
-message $msg]
|
||||
if {[winfo ismapped [_error_parent]]} {
|
||||
lappend cmd -parent [_error_parent]
|
||||
@ -77,7 +77,7 @@ proc hook_failed_popup {hook msg {is_fatal 1}} {
|
||||
wm withdraw $w
|
||||
|
||||
${NS}::frame $w.m
|
||||
${NS}::label $w.m.l1 -text "$hook hook failed:" \
|
||||
${NS}::label $w.m.l1 -text [mc "%s hook failed:" $hook] \
|
||||
-anchor w \
|
||||
-justify left \
|
||||
-font font_uibold
|
||||
@ -113,7 +113,7 @@ proc hook_failed_popup {hook msg {is_fatal 1}} {
|
||||
|
||||
bind $w <Visibility> "grab $w; focus $w"
|
||||
bind $w <Key-Return> "destroy $w"
|
||||
wm title $w [strcat "[appname] ([reponame]): " [mc "error"]]
|
||||
wm title $w [mc "%s (%s): error" [appname] [reponame]]
|
||||
wm deiconify $w
|
||||
tkwait window $w
|
||||
}
|
||||
|
Reference in New Issue
Block a user