Subversion Repositories DevTools

Rev

Rev 6185 | Rev 6579 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6185 Rev 6188
Line 323... Line 323...
323 
            Call objBtnControl.Visible("btnMakeRelease", "N")
 323 
            Call objBtnControl.Visible("btnMakeRelease", "N")
324 
        End If
 324 
        End If
325 
 
 325 
 
326 
        Call objBtnControl.Visible("btnMoveWIPToRelease", "Y")
 326 
        Call objBtnControl.Visible("btnMoveWIPToRelease", "Y")
327 
        Call objBtnControl.Active ("btnMoveWIPToRelease", "Y")
 327 
        Call objBtnControl.Active ("btnMoveWIPToRelease", "Y")
- 
 
 328 
 
328 
        Call objBtnControl.Visible("btnAddDaemonInstTestBuildPackage", "Y")
 329 
        Call objBtnControl.Visible("btnAddDaemonInstTestBuildPackage", "Y")
329 
        Call objBtnControl.Active ("btnAddDaemonInstTestBuildPackage", "Y")
 330 
        Call objBtnControl.Active ("btnAddDaemonInstTestBuildPackage", "Y")
330 
 
 331 
 
- 
 
 332 
        If pkgInfoHash.Item("hasTestInstr") <> "" Then
- 
 
 333 
            Call objBtnControl.Active("btnAddDaemonInstTestBuildPackage", "N")
- 
 
 334 
            Call objBtnControl.Visible("btnDelDaemonInstTestPackage", "Y")
- 
 
 335 
            Call objBtnControl.Active("btnDelDaemonInstTestPackage", "Y")
- 
 
 336 
        End If
- 
 
 337 
 
331 
        Call objBtnControl.Visible("btnDestroyWip", "Y")
 338 
        Call objBtnControl.Visible("btnDestroyWip", "Y")
332 
        If ((objAccessControl.UserName = pkgInfoHash.Item("creator")) OR (canActionControlInProject("DestroyPackageFromRelease"))) Then
 339 
        If ((objAccessControl.UserName = pkgInfoHash.Item("creator")) OR (canActionControlInProject("DestroyPackageFromRelease"))) Then
333 
            Call objBtnControl.Active ("btnDestroyWip", "Y")
 340 
            Call objBtnControl.Active ("btnDestroyWip", "Y")
334 
        End If
 341 
        End If
335 
 
 342