1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Quintiq file version 2.0
| #parent: #root
| StaticMethod GetVCMBranchName () as String
| {
| TextBody:
| [*
| branchname := 'Unknown';
| repodir := DomainModel::Domain().ActiveEditingDirectory();
| if ( VCRepository::IsExistingRepository( "git", repodir ) )
| {
| repo := VCRepository::OpenRepository( "git", "TestRepository", repodir);
| repo.UpdateBranches();
| activebranch := select( repo, Branches, abranch, abranch.IsActive() );
| branchname := guard( activebranch.Name(), branchname );
| }
|
| return branchname;
| *]
| }
|
|
