]> git.decadent.org.uk Git - maypole.git/blobdiff - lib/Apache/MVC.pm
Location handling stuff.
[maypole.git] / lib / Apache / MVC.pm
index 42d0d9102bbf4533526faa53f97dbe421b467e8d..7869cfa45125630b03ed96f7b5d58ace40a7d501 100644 (file)
@@ -90,9 +90,7 @@ sub get_request {
 
 sub parse_location {
     my $self = shift;
-    my $uri = $self->{ar}->uri();
-    my $loc = $self->{ar}->location();
-    $uri =~ s/^$loc//;
+    my $uri = $self->{ar}->path_info();
     my @pi = split /\//, $uri;
     shift @pi while @pi and !$pi[0];
     $self->{table} = shift @pi;