From 4a8ca505c7550ed92d136b71824e29cd8a13ce44 Mon Sep 17 00:00:00 2001
From: Aaron Trevena <aaron.trevena@gmail.com>
Date: Sun, 6 Nov 2005 15:25:11 +0000
Subject: [PATCH] ajt synch

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@417 48953598-375a-da11-a14b-00016c27c3ee
---
 Changes           | 4 ++++
 lib/Apache/MVC.pm | 1 -
 lib/Maypole.pm    | 7 ++++---
 3 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/Changes b/Changes
index ebc146b..d1d1769 100644
--- 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 )
diff --git a/lib/Apache/MVC.pm b/lib/Apache/MVC.pm
index 3ee8541..3bb33e6 100644
--- a/lib/Apache/MVC.pm
+++ b/lib/Apache/MVC.pm
@@ -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;
     {
diff --git a/lib/Maypole.pm b/lib/Maypole.pm
index b5de0c5..c31798d 100644
--- a/lib/Maypole.pm
+++ b/lib/Maypole.pm
@@ -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);
-- 
2.39.5