]> git.decadent.org.uk Git - maypole.git/commitdiff
ajt synch
authorAaron Trevena <aaron.trevena@gmail.com>
Sun, 6 Nov 2005 15:25:11 +0000 (15:25 +0000)
committerAaron Trevena <aaron.trevena@gmail.com>
Sun, 6 Nov 2005 15:25:11 +0000 (15:25 +0000)
git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@417 48953598-375a-da11-a14b-00016c27c3ee

Changes
lib/Apache/MVC.pm
lib/Maypole.pm

diff --git a/Changes b/Changes
index ebc146beff7d6d20eca105620c35c991f408e10e..d1d17691bb65df29c97aac90d849b3b5e7eaddeb 100644 (file)
--- a/Changes
+++ b/Changes
@@ -20,6 +20,10 @@ For information about current developments and future releases, see:
     Moved ar accessor to Apache::MVC (bug 14014)
     Refactored core to support further development in 2.11 and onwards
     Fixed related_class method (bug 14566)
+    Empty session attribute, and get_session method added to Maypole.pm
+    get_session now called during handler_guts before authenticate
+    new preprocess_path method added and called by parse_path, parse_path will leave any 
+       properties set by preprocess_path in place
 
 2.10 Tue 19 Jul 2005
     Multiple Template Paths added ( http://rt.cpan.org/NoAuth/Bug.html?id=13447 )
index 3ee8541a3882a58cb9b2a9c10bf18aacf64afc2d..3bb33e629a549a68644819ad526f47965b367e3c 100644 (file)
@@ -101,7 +101,6 @@ sub parse_location {
     for (keys %headers) {
         $self->headers_in->set($_, $headers{$_});
     }
-
     my $path = $self->ar->uri;
     my $loc  = $self->ar->location;
     {
index b5de0c51ad4fb11ee52960f9e158dfbc9cc632fd..c31798d62ada1b0555a8cb338babed145df71232 100644 (file)
@@ -757,6 +757,7 @@ sub call_exception
     return $self->exception($error);
 }
 
+
 =item exception
 
 This method is called if any exceptions are raised during the authentication or
@@ -818,11 +819,11 @@ sub parse_path
     $self->$_(undef) for qw/action table args/;
     
     $self->preprocess_path;
-
     $self->path || $self->path('frontpage');
-    
+
     my @pi = grep {length} split '/', $self->path;
-    
+
+
     $self->table  || $self->table(shift @pi);
     $self->action || $self->action( shift @pi or 'index' );
     $self->args   || $self->args(\@pi);