X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-gui%2Flib%2Findex.tcl;h=e38b647b71ea335d6771121cfd079de919ced55b;hb=380f26c29ba8b32c0f4e450c9a6c48e24e0919da;hp=5d7bbf23eddeb2ff146487b28a79feee1d296289;hpb=2c6b5d88287689e5a1acd5b5fefb8edd96931b6d;p=git.git diff --git a/git-gui/lib/index.tcl b/git-gui/lib/index.tcl index 5d7bbf23e..e38b647b7 100644 --- a/git-gui/lib/index.tcl +++ b/git-gui/lib/index.tcl @@ -356,12 +356,21 @@ proc do_add_all {} { global file_states set paths [list] + set unknown_paths [list] foreach path [array names file_states] { switch -glob -- [lindex $file_states($path) 0] { U? {continue} ?M - ?T - ?D {lappend paths $path} + ?O {lappend unknown_paths $path} + } + } + if {[llength $unknown_paths]} { + set reply [ask_popup [mc "There are unknown files do you also want +to stage those?"]] + if {$reply} { + set paths [concat $paths $unknown_paths] } } add_helper {Adding all changed files} $paths