hyung-hwan/codepot
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

changed AccessHandler.pm to prepare for more flexible uri parsing

Browse Source
This commit is contained in:
hyung-hwan 2017-01-25 17:00:16 +00:00
parent 149fd61412
commit d3b61a6616
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
codepot/etc/perl/Codepot/AccessHandler.pm
View File

@ -310,10 +310,13 @@ sub is_read_method
sub __handler sub __handler
{ {
my ($r, $cfg, $dbh) = @_; my ($r, $cfg, $dbh) = @_;
my ($empty, $base, $repo, $dummy) = split ('/', $r->uri(), 4);
my $method = uc($r->method()); my $method = uc($r->method());
my $is_method_r = is_read_method ($method); my $is_method_r = is_read_method ($method);
#my ($empty, $base, $repo, $dummy) = split ('/', $r->uri(), 4);
my @urisegs = split ('/', $r->uri());
my $repo = $urisegs[2];
my $author; my $author;
my $userid = undef; my $userid = undef;
my $password = undef; my $password = undef;