rev 1950 - trunk/buscador/lib

[prev] [thread] [next] [lurker] [Date index for 2005/02/23]

Author: richardc
Date: 2005-02-23 15:49:24 +0000 (Wed, 23 Feb 2005)
New Revision: 1950

Modified:
   trunk/buscador/lib/Buscador.pm
Log:
fudge around what seems to be an Apache::MVC bug


Modified: trunk/buscador/lib/Buscador.pm
===================================================================
--- trunk/buscador/lib/Buscador.pm	2005-02-23 11:25:58 UTC (rev 1949)
+++ trunk/buscador/lib/Buscador.pm	2005-02-23 15:49:24 UTC (rev 1950)
@@ -57,6 +57,11 @@
 sub parse_path {
     my $self = shift;
 
+    # line 45 of Apache::MVC seems broken.  this is a fudge --richardc
+    my $loc = $self->{ar}->location;
+    $loc =~ s{^/}{};
+    $self->{path} =~ s{^$loc}{};
+
     Buscador->call_plugins("parse_path", $self);
     $self->SUPER::parse_path();
 }

• rev 1950 - trunk/buscador/lib richardc 15:49 on 23 Feb 2005

Generated at 11:00 on 25 Feb 2005 by mariachi 0.52