X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FRequest.pm;h=6d14c5bf21dc9b03366c89bc10aa4993ffd5ba9b;hp=099f1de8aaf61586a244167dc41637c4788b11bd;hb=58889ece5ffe267a42384e206168edf52cceaa07;hpb=7e7437987dd389a99e16356af7c63cf672fde67d diff --git a/lib/Catalyst/Request.pm b/lib/Catalyst/Request.pm index 099f1de..6d14c5b 100644 --- a/lib/Catalyst/Request.pm +++ b/lib/Catalyst/Request.pm @@ -110,7 +110,7 @@ has _body => ( sub body { my $self = shift; $self->_context->prepare_body(); - $self->_body(@_) if scalar @_; + croak 'body is a reader' if scalar @_; return blessed $self->_body ? $self->_body->body : $self->_body; } @@ -120,7 +120,7 @@ has hostname => ( lazy => 1, default => sub { my ($self) = @_; - gethostbyaddr( inet_aton( $self->address ), AF_INET ) || 'localhost' + gethostbyaddr( inet_aton( $self->address ), AF_INET ) || $self->address }, ); @@ -138,6 +138,8 @@ sub query_params { shift->query_parameters(@_) } sub path_info { shift->path(@_) } sub snippets { shift->captures(@_) } +=for stopwords param params + =head1 NAME Catalyst::Request - provides information about the current client request @@ -210,7 +212,7 @@ Returns a reference to an array containing the arguments. For example, if your action was - package MyApp::C::Foo; + package MyApp::Controller::Foo; sub moose : Local { ... @@ -228,7 +230,7 @@ Shortcut for L. =head2 $req->base Contains the URI base. This will always have a trailing slash. Note that the -URI scheme (eg., http vs. https) must be determined through heuristics; +URI scheme (e.g., http vs. https) must be determined through heuristics; depending on your server configuration, it may be incorrect. See $req->secure for more info. @@ -237,8 +239,9 @@ C then C is C. =head2 $req->body -Returns the message body of the request, unless Content-Type is -C or C. +Returns the message body of the request, as returned by L: a string, +unless Content-Type is C, C, or +C, in which case a L object is returned. =head2 $req->body_parameters @@ -315,7 +318,7 @@ Returns an L object containing the headers for the current reques =head2 $req->hostname -Returns the hostname of the client. +Returns the hostname of the client. Use C<< $req->uri->host >> to get the hostname of the server. =head2 $req->input @@ -426,6 +429,10 @@ Shortcut for $req->parameters. Returns the path, i.e. the part of the URI after $req->base, for the current request. + http://localhost/path/foo + + $c->request->path will contain 'path/foo' + =head2 $req->path_info Alias for path, added for compatibility with L. @@ -482,8 +489,8 @@ Shortcut for $req->headers->referer. Returns the referring page. =head2 $req->secure Returns true or false, indicating whether the connection is secure -(https). Note that the URI scheme (eg., http vs. https) must be determined -through heuristics, and therefore the reliablity of $req->secure will depend +(https). Note that the URI scheme (e.g., http vs. https) must be determined +through heuristics, and therefore the reliability of $req->secure will depend on your server configuration. If you are serving secure pages on the standard SSL port (443) and/or setting the HTTPS environment variable, $req->secure should be valid. @@ -569,7 +576,7 @@ L objects. =head2 $req->uri -Returns a URI object for the current request. Stringifies to the URI text. +Returns a L object for the current request. Stringifies to the URI text. =head2 $req->mangle_params( { key => 'value' }, $appendmode); @@ -672,11 +679,6 @@ sub uri_with { return $uri; } -=head2 $req->user - -Returns the currently logged in user. B, do not call, -this will be removed in version 5.81. - =head2 $req->remote_user Returns the value of the C environment variable.