remove some whitespace dzil complains about
Robert Buels [Wed, 8 Jun 2011 22:25:27 +0000 (22:25 +0000)]
examples/daemon.pl
t/08error.t

index c718487..37fdc0f 100644 (file)
@@ -18,7 +18,7 @@ my $server = HTTP::Daemon->new( LocalPort => 3000, ReuseAddr => 1 )
 print "Please contact me at: <URL:", $server->url, ">\n";
 
 while ( my $client = $server->accept ) {
-    
+
     my %e = (
         REMOTE_ADDR => $client->peerhost,
         REMOTE_HOST => $client->peerhost,
@@ -35,7 +35,7 @@ while ( my $client = $server->accept ) {
         my $q = CGI->new;
 
         print $q->header( -charset => 'UTF-8' ),
-              $q->start_html( 
+              $q->start_html(
                   -title    => 'Hello World',
                   -encoding => 'UTF-8'
               ),
index f117014..1d516fb 100644 (file)
@@ -32,7 +32,7 @@ ok( length($response->content) > 0, 'Response Content' );
     my $c = HTTP::Request::AsCGI->new($r);
 
     $c->setup;
-    
+
     print "Content-Type: text/plain\n";
     print "Status: 500 Borked\n";
     print "\n";