summaryrefslogtreecommitdiff
path: root/lib/index.tcl
diff options
context:
space:
mode:
authorGustaf Hendeby <hendeby@isy.liu.se>2008-08-22 20:10:27 (GMT)
committerShawn O. Pearce <spearce@spearce.org>2008-08-25 04:36:17 (GMT)
commite681cb7d6a00b4860c84bf8ca7b8d8dab366c9fc (patch)
tree16ba718b7f41741b6f096ac2666fc755600d227e /lib/index.tcl
parentf2816b3d34ef93553b14a5fe23c48d092a74901f (diff)
downloadgit-e681cb7d6a00b4860c84bf8ca7b8d8dab366c9fc.zip
git-e681cb7d6a00b4860c84bf8ca7b8d8dab366c9fc.tar.gz
git-e681cb7d6a00b4860c84bf8ca7b8d8dab366c9fc.tar.bz2
git-gui: Teach git gui about file type changes
Signed-off-by: Gustaf Hendeby <hendeby@isy.liu.se> Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
Diffstat (limited to 'lib/index.tcl')
-rw-r--r--lib/index.tcl7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/index.tcl b/lib/index.tcl
index 3c1fce7..7c27f2a 100644
--- a/lib/index.tcl
+++ b/lib/index.tcl
@@ -99,6 +99,7 @@ proc write_update_indexinfo {fd pathList totalCnt batch after} {
switch -glob -- [lindex $s 0] {
A? {set new _O}
M? {set new _M}
+ T_ {set new _T}
D_ {set new _D}
D? {set new _?}
?? {continue}
@@ -162,6 +163,7 @@ proc write_update_index {fd pathList totalCnt batch after} {
?D {set new D_}
_O -
AM {set new A_}
+ _T {set new T_}
U? {
if {[file exists $path]} {
set new M_
@@ -231,6 +233,7 @@ proc write_checkout_index {fd pathList totalCnt batch after} {
switch -glob -- [lindex $file_states($path) 0] {
U? {continue}
?M -
+ ?T -
?D {
puts -nonewline $fd "[encoding convertto $path]\0"
display_file $path ?_
@@ -252,6 +255,7 @@ proc unstage_helper {txt paths} {
switch -glob -- [lindex $file_states($path) 0] {
A? -
M? -
+ T_ -
D? {
lappend pathList $path
if {$path eq $current_diff_path} {
@@ -296,6 +300,7 @@ proc add_helper {txt paths} {
_O -
?M -
?D -
+ ?T -
U? {
lappend pathList $path
if {$path eq $current_diff_path} {
@@ -336,6 +341,7 @@ proc do_add_all {} {
switch -glob -- [lindex $file_states($path) 0] {
U? {continue}
?M -
+ ?T -
?D {lappend paths $path}
}
}
@@ -353,6 +359,7 @@ proc revert_helper {txt paths} {
switch -glob -- [lindex $file_states($path) 0] {
U? {continue}
?M -
+ ?T -
?D {
lappend pathList $path
if {$path eq $current_diff_path} {