reflow POD for marcus

mojolicious · Dec 19, 2011 · e7cfa06 · e7cfa06
1 parent 27ccf4d
commit e7cfa06
Show file tree

Hide file tree

Showing 4 changed files with 13 additions and 19 deletions.
diff --git a/Changes b/Changes
@@ -1,7 +1,7 @@
 This file documents the revision history for Perl extension Mojolicious.
 
-2.39    2011-12-18 00:00:00
-        - Improved documentation. (vervain, sri)
+2.39    2011-12-19 00:00:00
+        - Improved documentation. (marcus, vervain, sri)
         - Fixed small argument bug in client method of Mojo::IOLoop.
 
 2.38    2011-12-17 00:00:00

diff --git a/lib/Mojo/Server/Daemon.pm b/lib/Mojo/Server/Daemon.pm
@@ -36,15 +36,9 @@ my $SOCKET_RE = qr|
 
 sub DESTROY {
   my $self = shift;
-
-  # Clean up connections
   return unless my $loop = $self->ioloop;
-  my $cs = $self->{connections} || {};
-  for my $id (keys %$cs) { $loop->drop($id) }
-
-  # Clean up listen sockets
-  return unless my $listen = $self->{listening};
-  for my $id (@$listen) { $loop->drop($id) }
+  $loop->drop($_) for keys %{$self->{connections} || {}};
+  $loop->drop($_) for @{$self->{listening} || []};
 }
 
 sub prepare_ioloop {

diff --git a/lib/Mojolicious.pm b/lib/Mojolicious.pm
@@ -646,21 +646,21 @@ change controller state, which includes request, response and stash.
 
 =head2 Web
 
-  http://mojolicio.us
+L<http://mojolicio.us>
 
 =head2 IRC
 
-  #mojo on irc.perl.org
+C<#mojo> on C<irc.perl.org>
 
 =head2 Mailing-List
 
-  http://groups.google.com/group/mojolicious
+L<http://groups.google.com/group/mojolicious>
 
 =head1 DEVELOPMENT
 
 =head2 Repository
 
-  http://github.com/kraih/mojo
+L<http://github.com/kraih/mojo>
 
 =head1 BUNDLED FILES
 

diff --git a/lib/Mojolicious/Guides.pod b/lib/Mojolicious/Guides.pod
@@ -13,11 +13,11 @@ latest updates.
 =head1 LEARNING PERL
 
 If you are new to Perl, we recommend
-L<Learn Perl in 2 hours 30 minutes|http://qntm.org/files/perl/perl.html> for a
-quick introduction, or the L<Modern Perl|http://onyxneon.com/books/modern_perl/>
-book, freely available in many formats. Both are excellent introductions to the
-language. For more books and documentation, Check out
-L<learn.perl.org|http://learn.perl.org/>.
+L<Learn Perl in 2 hours 30 minutes|http://qntm.org/files/perl/perl.html> for
+a quick introduction, or the
+L<Modern Perl|http://onyxneon.com/books/modern_perl/> book, freely available
+in many formats. Both are excellent introductions to the language. For more
+books and documentation, check out L<learn.perl.org|http://learn.perl.org/>.
 
 =head1 TUTORIAL