X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-gui%2Flib%2Fdiff.tcl;h=bbbf15c875f437f486f652d204bcebf1e5f1a8e4;hb=42fc11c1103a88c49233f04dc0c2f5659b3973fe;hp=94ee38cccc1ee9a43f8dd1309353609b283d8af5;hpb=550806439402877e6dab22cacfc6de8757d18593;p=git.git diff --git a/git-gui/lib/diff.tcl b/git-gui/lib/diff.tcl index 94ee38ccc..bbbf15c87 100644 --- a/git-gui/lib/diff.tcl +++ b/git-gui/lib/diff.tcl @@ -16,7 +16,7 @@ proc clear_diff {} { $ui_workdir tag remove in_diff 0.0 end } -proc reshow_diff {} { +proc reshow_diff {{after {}}} { global file_states file_lists global current_diff_path current_diff_side global ui_diff @@ -30,13 +30,13 @@ proc reshow_diff {} { || [lsearch -sorted -exact $file_lists($current_diff_side) $p] == -1} { if {[find_next_diff $current_diff_side $p {} {[^O]}]} { - next_diff + next_diff $after } else { clear_diff } } else { set save_pos [lindex [$ui_diff yview] 0] - show_diff $p $current_diff_side {} $save_pos + show_diff $p $current_diff_side {} $save_pos $after } }