summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: e7deec6)
raw | patch | inline | side by side (parent: e7deec6)
author | Shawn O. Pearce <spearce@spearce.org> | |
Thu, 20 Sep 2007 17:03:43 +0000 (13:03 -0400) | ||
committer | Shawn O. Pearce <spearce@spearce.org> | |
Thu, 20 Sep 2007 17:03:43 +0000 (13:03 -0400) |
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>
these can be properly localized.
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
lib/transport.tcl | patch | blob | history |
diff --git a/lib/transport.tcl b/lib/transport.tcl
index 1c7baef1732a63dc4a7a0e6b86d567616bd379f2..3b05b8fc2c5620a03014274cd7855868ea468f0e 100644 (file)
--- a/lib/transport.tcl
+++ b/lib/transport.tcl
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]
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 \
- "push $remote" \
+ [mc "push %s" $remote] \
[mc "Pushing changes to %s" $remote]]
set cmd [list git push]
lappend cmd -v
}
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