Skip to content

Commit

Permalink
mention which plugins are loaded automatically
Browse files Browse the repository at this point in the history
  • Loading branch information
kraih committed Apr 3, 2012
1 parent f00612a commit d579715
Show file tree
Hide file tree
Showing 5 changed files with 17 additions and 15 deletions.
3 changes: 3 additions & 0 deletions Changes
@@ -1,5 +1,8 @@
This file documents the revision history for Perl extension Mojolicious.

2.72 2012-04-03
- Improved documentation.

2.71 2012-04-03
- Improved Hypnotoad error handling.
- Improved version command to detect proxy servers automatically.
Expand Down
3 changes: 1 addition & 2 deletions lib/Mojo/Server/CGI.pm
Expand Up @@ -16,8 +16,7 @@ sub run {
my $req = $tx->req->parse(\%ENV);

# Store connection information
$tx->local_port($ENV{SERVER_PORT});
$tx->remote_address($ENV{REMOTE_ADDR});
$tx->local_port($ENV{SERVER_PORT})->remote_address($ENV{REMOTE_ADDR});

# Request body
binmode STDIN;
Expand Down
3 changes: 1 addition & 2 deletions lib/Mojo/Server/PSGI.pm
Expand Up @@ -15,8 +15,7 @@ sub run {
my $req = $tx->req->parse($env);

# Store connection information
$tx->local_port($env->{SERVER_PORT});
$tx->remote_address($env->{REMOTE_ADDR});
$tx->local_port($env->{SERVER_PORT})->remote_address($env->{REMOTE_ADDR});

# Request body
my $len = $env->{CONTENT_LENGTH};
Expand Down
6 changes: 3 additions & 3 deletions lib/Mojo/Transaction.pm
Expand Up @@ -38,11 +38,11 @@ sub is_writing {
}

sub remote_address {
my ($self, $address) = @_;
my $self = shift;

# New address
if ($address) {
$self->{remote_address} = $address;
if (@_) {
$self->{remote_address} = shift;
return $self;
}

Expand Down
17 changes: 9 additions & 8 deletions lib/Mojolicious.pm
Expand Up @@ -33,7 +33,7 @@ has static => sub { Mojolicious::Static->new };
has types => sub { Mojolicious::Types->new };

our $CODENAME = 'Leaf Fluttering In Wind';
our $VERSION = '2.71';
our $VERSION = '2.72';

# "These old doomsday devices are dangerously unstable.
# I'll rest easier not knowing where they are."
Expand Down Expand Up @@ -560,19 +560,20 @@ Perl-ish configuration files.
=item L<Mojolicious::Plugin::DefaultHelpers>
General purpose helper collection.
General purpose helper collection, loaded automatically.
=item L<Mojolicious::Plugin::EPLRenderer>
Renderer for plain embedded Perl templates.
Renderer for plain embedded Perl templates, loaded automatically.
=item L<Mojolicious::Plugin::EPRenderer>
Renderer for more sophisiticated embedded Perl templates.
Renderer for more sophisiticated embedded Perl templates, loaded
automatically.
=item L<Mojolicious::Plugin::HeaderCondition>
Route condition for all kinds of headers.
Route condition for all kinds of headers, loaded automatically.
=item L<Mojolicious::Plugin::I18N>
Expand All @@ -592,15 +593,15 @@ Renderer for POD files and documentation browser.
=item L<Mojolicious::Plugin::PoweredBy>
Add an C<X-Powered-By> header to outgoing responses.
Add an C<X-Powered-By> header to outgoing responses, loaded automatically.
=item L<Mojolicious::Plugin::RequestTimer>
Log timing information.
Log timing information, loaded automatically.
=item L<Mojolicious::Plugin::TagHelpers>
Template specific helper collection.
Template specific helper collection, loaded automatically.
=back
Expand Down

0 comments on commit d579715

Please sign in to comment.