path: root/lib/database.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/database.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/database.tcl')
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/database.tcl b/lib/database.tcl
index e31466f..73058a8 100644
--- a/lib/database.tcl
+++ b/lib/database.tcl
@@ -69,21 +69,21 @@ proc do_stats {} {
proc do_gc {} {
- set w [new_console {gc} {Compressing the object database}]
- console_chain {
- {console_exec {git pack-refs --prune}}
- {console_exec {git reflog expire --all}}
- {console_exec {git repack -a -d -l}}
- {console_exec {git rerere gc}}
+ set w [console::new {gc} {Compressing the object database}]
+ console::chain {
+ {exec {git pack-refs --prune}}
+ {exec {git reflog expire --all}}
+ {exec {git repack -a -d -l}}
+ {exec {git rerere gc}}
} $w
proc do_fsck_objects {} {
- set w [new_console {fsck-objects} \
+ set w [console::new {fsck-objects} \
{Verifying the object database with fsck-objects}]
set cmd [list git fsck-objects]
lappend cmd --full
lappend cmd --cache
lappend cmd --strict
- console_exec $w $cmd console_done
+ console::exec $w $cmd