Fix an apache perl module error. #466

Contributed by Artem Naluzhnyy.
This commit is contained in:
Felix Schäfer 2011-06-16 21:12:36 +02:00
parent 2ceffca3e3
commit 0c03142832
1 changed files with 1 additions and 0 deletions

View File

@ -480,6 +480,7 @@ sub is_member {
sub get_project_identifier {
my $r = shift;
my $cfg = Apache2::Module::get_config(__PACKAGE__, $r->server, $r->per_dir_config);
my $location = $r->location;
my ($identifier) = $r->uri =~ m{$location/*([^/]+)};
$identifier =~ s/\.git$// if (defined $cfg->{RedmineGitSmartHttp} and $cfg->{RedmineGitSmartHttp});