index dd2d750ab17f9c1831ffea70459d07726bfcfaec..e9d4600a252b054fefd09d7838d54fdc363526f3 100755 (executable)
--- a/git-gui
+++ b/git-gui
AM -
AD -
MM -
+ MD -
DM {
set file_states($path) [list \
_[string index $m 1] \
AM -
AD -
MM -
+ MD -
U? -
_M -
_D -
AM -
AD -
MM -
+ MD -
_M -
_D {lappend paths $path}
}