summaryrefslogtreecommitdiff
path: root/git-gui
diff options
context:
space:
mode:
Diffstat (limited to 'git-gui')
-rwxr-xr-xgit-gui11
1 files changed, 11 insertions, 0 deletions
diff --git a/git-gui b/git-gui
index 83f713535f..eb7329c218 100755
--- a/git-gui
+++ b/git-gui
@@ -1276,6 +1276,14 @@ proc do_gitk {} {
}
}
+proc do_repack {} {
+ set w [new_console "repack" "Repacking the object database"]
+ set cmd [list git repack]
+ lappend cmd -a
+ lappend cmd -d
+ console_exec $w $cmd
+}
+
proc do_quit {} {
global gitdir ui_comm
@@ -1406,6 +1414,9 @@ menu .mbar.project
.mbar.project add command -label Visualize \
-command do_gitk \
-font $mainfont
+.mbar.project add command -label {Repack Database} \
+ -command do_repack \
+ -font $mainfont
.mbar.project add command -label Quit \
-command do_quit \
-accelerator $M1T-Q \