From: Sebastian Riedel <sri@labs.kraih.com>
Date: Mon, 7 Nov 2005 20:31:41 +0000 (+0000)
Subject: Removed $c->req->user accessor
X-Git-Tag: 5.7099_04~1000
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=6aa029462e687d2dd910c1f8f97a31c054f5c56a

Removed $c->req->user accessor
---

diff --git a/Changes b/Changes
index 70ce52e..509a2a8 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 Tis file documents the revision history for Perl extension Catalyst.
 
 5.5
+        - Removed $c->req->user accessor
         - Added $c->controller, $c->model and $c->view shortcuts
         - Switched to Text::SimpleTable
 
diff --git a/lib/Catalyst/Request.pm b/lib/Catalyst/Request.pm
index 73c6bb3..72da5a7 100644
--- a/lib/Catalyst/Request.pm
+++ b/lib/Catalyst/Request.pm
@@ -7,7 +7,7 @@ use IO::Socket qw[AF_INET inet_aton];
 
 __PACKAGE__->mk_accessors(
     qw/action address arguments cookies headers match method
-      protocol query_parameters secure snippets uri user/
+      protocol query_parameters secure snippets uri/
 );
 
 *args         = \&arguments;
@@ -63,7 +63,6 @@ Catalyst::Request - Catalyst Request Class
     $req->upload;
     $req->uploads;
     $req->uri;
-    $req->user;
     $req->user_agent;
 
 See also L<Catalyst>.
@@ -123,16 +122,16 @@ then C<base> is C<http://localhost:3000/>.
 
 sub base {
     my ( $self, $base ) = @_;
-    
+
     return $self->{base} unless $base;
-    
+
     $self->{base} = $base;
-    
+
     # set the value in path for backwards-compat
     if ( $self->uri ) {
         $self->path;
     }
-    
+
     return $self->{base};
 }
 
@@ -500,10 +499,6 @@ sub uploads {
 
 Returns a URI object for the request.
 
-=item $req->user
-
-Contains the user name of user if authentication check was successful.
-
 =item $req->user_agent
 
 Shortcut to $req->headers->user_agent. User Agent version string.