summaryrefslogtreecommitdiffstats
path: root/extra
diff options
context:
space:
mode:
authorEric Davis <edavis@littlestreamsoftware.com>2010-07-08 03:48:40 +0000
committerEric Davis <edavis@littlestreamsoftware.com>2010-07-08 03:48:40 +0000
commit29e7b8d9eac68173d5458f89f8b04b7055f68623 (patch)
tree0fcd68a97fb3f0913989610b27060a6144fb40e0 /extra
parentf3b9c0027f02503cdafc524f282397b5a3259885 (diff)
downloadredmine-29e7b8d9eac68173d5458f89f8b04b7055f68623.tar.gz
redmine-29e7b8d9eac68173d5458f89f8b04b7055f68623.zip
Merged r3832 from trunk.
git-svn-id: svn+ssh://rubyforge.org/var/svn/redmine/branches/0.9-stable@3834 e93f8b46-1217-0410-a6f0-8f06a7374b81
Diffstat (limited to 'extra')
-rw-r--r--extra/svn/Redmine.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/extra/svn/Redmine.pm b/extra/svn/Redmine.pm
index f608ee124..091e21930 100644
--- a/extra/svn/Redmine.pm
+++ b/extra/svn/Redmine.pm
@@ -338,7 +338,9 @@ sub is_member {
bindpw => $rowldap[4] ? $rowldap[4] : "",
filter => "(".$rowldap[6]."=%s)"
);
- $ret = 1 if ($ldap->authenticate($redmine_user, $redmine_pass));
+ my $method = $r->method;
+ $ret = 1 if ($ldap->authenticate($redmine_user, $redmine_pass) && ((defined $read_only_methods{$method} && $permissions =~ /:browse_repository/) || $permissions =~ /:commit_access/));
+
}
$sthldap->finish();
undef $sthldap;