Mercurial > hg > soundsoftware-site
view test/unit/lib/redmine/.svn/text-base/access_control_test.rb.svn-base @ 206:30203ffaa612 cannam-pre-20110113-merge
Merge from branch "bug_67"
author | Chris Cannam <chris.cannam@soundsoftware.ac.uk> |
---|---|
date | Tue, 08 Feb 2011 12:20:31 +0000 |
parents | 513646585e45 |
children | af80e5618e9b |
line wrap: on
line source
# Redmine - project management software # Copyright (C) 2006-2008 Jean-Philippe Lang # # This program is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License # as published by the Free Software Foundation; either version 2 # of the License, or (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. require File.dirname(__FILE__) + '/../../../test_helper' class Redmine::AccessControlTest < ActiveSupport::TestCase def setup @access_module = Redmine::AccessControl end def test_permissions perms = @access_module.permissions assert perms.is_a?(Array) assert perms.first.is_a?(Redmine::AccessControl::Permission) end def test_module_permission perm = @access_module.permission(:view_issues) assert perm.is_a?(Redmine::AccessControl::Permission) assert_equal :view_issues, perm.name assert_equal :issue_tracking, perm.project_module assert perm.actions.is_a?(Array) assert perm.actions.include?('issues/index') end def test_no_module_permission perm = @access_module.permission(:edit_project) assert perm.is_a?(Redmine::AccessControl::Permission) assert_equal :edit_project, perm.name assert_nil perm.project_module assert perm.actions.is_a?(Array) assert perm.actions.include?('projects/settings') end end