git-gui: Fix missing i18n markup in push/fetch windows

The console window titles should also be marked up with i18n strings so
these can be properly localized.

Signed-off-by: Shawn O. Pearce <spearce@spearce.org>

diff --git a/lib/transport.tcl b/lib/transport.tcl
index 1c7baef1732a63dc4a7a0e6b86d567616bd379f2..3b05b8fc2c5620a03014274cd7855868ea468f0e 100644 (file)
--- a/lib/transport.tcl
+++ b/lib/transport.tcl
@@ -3,7 +3,7 @@
 
 proc fetch_from {remote} {
        set w [console::new \
 
 proc fetch_from {remote} {
        set w [console::new \

-               "fetch $remote" \
+               [mc "fetch %s" $remote] \

                [mc "Fetching new changes from %s" $remote]]
        set cmds [list]
        lappend cmds [list exec git fetch $remote]
                [mc "Fetching new changes from %s" $remote]]
        set cmds [list]
        lappend cmds [list exec git fetch $remote]


@@ -15,14 +15,14 @@ proc fetch_from {remote} {
 
 proc prune_from {remote} {
        set w [console::new \
 
 proc prune_from {remote} {
        set w [console::new \

-               "remote prune $remote" \
+               [mc "remote prune %s" $remote] \

                [mc "Pruning tracking branches deleted from %s" $remote]]
        console::exec $w [list git remote prune $remote]
 }
 
 proc push_to {remote} {
        set w [console::new \
                [mc "Pruning tracking branches deleted from %s" $remote]]
        console::exec $w [list git remote prune $remote]
 }
 
 proc push_to {remote} {
        set w [console::new \

-               "push $remote" \
+               [mc "push %s" $remote] \

                [mc "Pushing changes to %s" $remote]]
        set cmd [list git push]
        lappend cmd -v
                [mc "Pushing changes to %s" $remote]]
        set cmd [list git push]
        lappend cmd -v


@@ -64,7 +64,7 @@ proc start_push_anywhere_action {w} {
        }
 
        set cons [console::new \
        }
 
        set cons [console::new \

-               "push $r_url" \
+               [mc "push %s" $r_url] \

                [mc "Pushing %s %s to %s" $cnt $unit $r_url]]
        console::exec $cons $cmd
        destroy $w
                [mc "Pushing %s %s to %s" $cnt $unit $r_url]]
        console::exec $cons $cmd
        destroy $w