path: root/lib/transport.tcl
diff options
authorShawn O. Pearce <>2007-05-01 06:59:53 (GMT)
committerShawn O. Pearce <>2007-05-08 03:35:50 (GMT)
commita35d65d9c8a2a6a10d369c00e22aded6fbdff2a9 (patch)
tree1d6302ccfbd91654b724a293a9dcb38c2d3d3d97 /lib/transport.tcl
parentf522c9b5ed367172f969397589ae3d686b867ac0 (diff)
git-gui: Move console procs into their own namespace
To help modularize git-gui better I'm isolating the code and variables required to handle our little console windows into their own namespace. This way we can say console::new rather than new_console, and the hidden internal procs to create the window and read data from our filehandle are off in their own private little land, where most users don't see them. Signed-off-by: Shawn O. Pearce <>
Diffstat (limited to 'lib/transport.tcl')
1 files changed, 8 insertions, 6 deletions
diff --git a/lib/transport.tcl b/lib/transport.tcl
index ce6fc45..c0e7d20 100644
--- a/lib/transport.tcl
+++ b/lib/transport.tcl
@@ -2,22 +2,22 @@
# Copyright (C) 2006, 2007 Shawn Pearce
proc fetch_from {remote} {
- set w [new_console \
+ set w [console::new \
"fetch $remote" \
"Fetching new changes from $remote"]
set cmd [list git fetch]
lappend cmd $remote
- console_exec $w $cmd console_done
+ console::exec $w $cmd
proc push_to {remote} {
- set w [new_console \
+ set w [console::new \
"push $remote" \
"Pushing changes to $remote"]
set cmd [list git push]
lappend cmd -v
lappend cmd $remote
- console_exec $w $cmd console_done
+ console::exec $w $cmd
proc start_push_anywhere_action {w} {
@@ -53,8 +53,10 @@ proc start_push_anywhere_action {w} {
set unit branches
- set cons [new_console "push $r_url" "Pushing $cnt $unit to $r_url"]
- console_exec $cons $cmd console_done
+ set cons [console::new \
+ "push $r_url" \
+ "Pushing $cnt $unit to $r_url"]
+ console::exec $cons $cmd
destroy $w