Subversion Repositories DevTools

Rev

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

Rev 4585 Rev 5061
Line 72... Line 72...
72 
End Function
 72 
End Function
73 
'-------------Page Access Condition--------------------------------------------
 73 
'-------------Page Access Condition--------------------------------------------
74 
If NOT objAccessControl.UserLogedIn Then
 74 
If NOT objAccessControl.UserLogedIn Then
75 
	Response.Redirect("message.asp?msg=401-9")
 75 
	Response.Redirect("message.asp?msg=401-9")
76 
End If
 76 
End If
77 
If objAccessControl.IsActive("EditPackageProperties") Then
 77 
If canActionControlInProject("EditPackageProperties") Then
78 
    canEdit = true
 78 
    canEdit = true
79 
Else
 79 
Else
80 
    parPkgId = NULL
 80 
    parPkgId = NULL
81 
End If
 81 
End If
82 
'------------- Before Render --------------------------------------------------
 82 
'------------- Before Render --------------------------------------------------