File tree 1 file changed +4
-2
lines changed
1 file changed +4
-2
lines changed Original file line number Diff line number Diff line change @@ -2272,12 +2272,14 @@ ClassMethod GitStatus(ByRef files, IncludeAllFiles = 0)
2272
2272
set list = $listfromstring (lines , $char (0 ))
2273
2273
set pointer = 0
2274
2274
while $listnext (list , pointer , item ) {
2275
- set operation = $zstrip ($extract (item , 1 , 2 ), " <W" )
2275
+ set operation = $zstrip ($extract (item , 1 , 2 ), " <> W" )
2276
2276
set externalName = $extract (item , 4 , *)
2277
2277
set internalName = ..NameToInternalName (externalName ,,0 )
2278
2278
if (internalName '= " " ) {
2279
2279
set files (internalName ) = $listbuild (operation , externalName )
2280
- set @..#Storage@(" items" ,..NormalizeInternalName (internalName )) = " "
2280
+ if (operation '= " D" ) {
2281
+ set @..#Storage@(" items" ,..NormalizeInternalName (internalName )) = " "
2282
+ }
2281
2283
} elseif ((IncludeAllFiles ) && (externalName '= " " )) {
2282
2284
set externalName = $TRANSLATE (externalName , " \" , " /" )
2283
2285
set files ($I (files )) = $listbuild (operation , externalName )
You can’t perform that action at this time.
0 commit comments