Subversion Repositories DevTools

Rev

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

Rev 5048 Rev 5061
Line 219... Line 219...
219 
patchState = "checked"
 219 
patchState = "checked"
220 
 
 220 
 
221 
' The build_type will be displayed but not enabled unless the user
 221 
' The build_type will be displayed but not enabled unless the user
222 
' is allowed to created manually built packages
 222 
' is allowed to created manually built packages
223 
disableBuildType = FALSE
 223 
disableBuildType = FALSE
224 
If parRename <> "" OR NOT objAccessControl.IsActive("ApproveForManualBuild") Then
 224 
If parRename <> "" OR NOT canActionControlInProject("ApproveForManualBuild") Then
225 
    disableBuildType = TRUE
 225 
    disableBuildType = TRUE
226 
End If
 226 
End If
227 
 
 227 
 
228 
Set objPkgInfo = CreateObject("Scripting.Dictionary")
 228 
Set objPkgInfo = CreateObject("Scripting.Dictionary")
229 
 
 229