Subversion Repositories DevTools

Rev

Rev 5177 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5177 Rev 5178
Line 31... Line 31...
31
 
31
 
32
   ReleaseMode = GetReleaseMode ( NNrtag_id )
32
   ReleaseMode = GetReleaseMode ( NNrtag_id )
33
 
33
 
34
   PRIVATE_Is_Allowed_To = FALSE
34
   PRIVATE_Is_Allowed_To = FALSE
35
 
35
 
36
   If ReleaseMode <> enumDB_RELEASE_IN_CLOSED_MODE AND ReleaseMode <> enumDB_RELEASE_IN_PRESERVE_MODE AND ReleaseMode <> enumDB_RELEASE_IN_ARCHIVE_MODE Then
36
   If NOT releaseIsClosed(ReleaseMode) Then
37
      If ( ReleaseMode = enumDB_RELEASE_IN_OPEN_MODE ) Then
37
      If ( ReleaseMode = enumDB_RELEASE_IN_OPEN_MODE ) Then
38
         PRIVATE_Is_Allowed_To = TRUE
38
         PRIVATE_Is_Allowed_To = TRUE
39
      Else
39
      Else
40
         If canActionControlInProject(accessControlObjectName) Then
40
         If canActionControlInProject(accessControlObjectName) Then
41
            PRIVATE_Is_Allowed_To = TRUE
41
            PRIVATE_Is_Allowed_To = TRUE