File tree 2 files changed +5
-4
lines changed
2 files changed +5
-4
lines changed Original file line number Diff line number Diff line change 2
2
Class SourceControl .Git .Modification Extends %RegisteredObject
3
3
{
4
4
5
- /// path of the file
5
+ /// path of the file relative to the Git repository
6
6
Property externalName As %String ;
7
7
8
8
/// Name in IRIS SourceControl.Git.Modification
@@ -11,4 +11,4 @@ Property internalName As %String;
11
11
/// Type of change (A|C|D|M|R|T|U|X|B). See git diff documentation.
12
12
Property changeType As %String ;
13
13
14
- }
14
+ }
Original file line number Diff line number Diff line change @@ -1573,7 +1573,7 @@ ClassMethod ImportRoutines(force As %Boolean = 0) As %Status
1573
1573
set modification = ##class (SourceControl.Git.Modification ).%New ()
1574
1574
set modification .changeType = " M"
1575
1575
set modification .internalName = internalName
1576
- set modification .externalName = ..FullExternalName (internalName )
1576
+ set modification .externalName = ..ExternalName (internalName )
1577
1577
set files ($increment (files )) = modification
1578
1578
}
1579
1579
}
@@ -1588,13 +1588,14 @@ ClassMethod ImportRoutines(force As %Boolean = 0) As %Status
1588
1588
set context = ##class (SourceControl.Git.PackageManagerContext ).ForInternalName (item )
1589
1589
continue :context .Package '=refPackage
1590
1590
1591
+ set externalName = ..ExternalName (item )
1591
1592
set fullExternalName = ..FullExternalName (item )
1592
1593
if '##class (%File ).Exists (fullExternalName ) {
1593
1594
write !,fullExternalName ," does not exist - deleting " ,item
1594
1595
set modification = ##class (SourceControl.Git.Modification ).%New ()
1595
1596
set modification .changeType = " D"
1596
1597
set modification .internalName = item
1597
- set modification .externalName = fullExternalName
1598
+ set modification .externalName = externalName
1598
1599
set files ($increment (files )) = modification
1599
1600
}
1600
1601
}
You can’t perform that action at this time.
0 commit comments