path: root/lib/database.tcl
diff options
authorShawn O. Pearce <>2007-05-09 00:33:47 (GMT)
committerShawn O. Pearce <>2007-05-09 01:38:54 (GMT)
commitc74b6c66f00ce51b2c01d20fc5ef0e6429811124 (patch)
tree354c54001cae46387de2230af368b33c1b4b5154 /lib/database.tcl
parent1f07c4e5cefec88d825045ade24eee71f6a2df47 (diff)
git-gui: Convert browser, console to "class" format
Now that we have a slightly easier method of working with per-widget data we should make use of that technique in our browser and console meta-widgets, as both have a decent amount of information that they store on a per-widget basis and our current approach of handling it is difficult to follow. Signed-off-by: Shawn O. Pearce <>
Diffstat (limited to 'lib/database.tcl')
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/database.tcl b/lib/database.tcl
index 73058a8..43e4a28 100644
--- a/lib/database.tcl
+++ b/lib/database.tcl
@@ -70,12 +70,12 @@ proc do_stats {} {
proc do_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
+ console::chain $w {
+ {exec git pack-refs --prune}
+ {exec git reflog expire --all}
+ {exec git repack -a -d -l}
+ {exec git rerere gc}
+ }
proc do_fsck_objects {} {