[SCM] co-operative multithreaded server using Coro branch, master, updated. debian/1.2-2-4-g1552b41

Salvatore Bonaccorso carnil at debian.org
Thu Jul 12 15:19:50 UTC 2012


The following commit has been merged in the master branch:
commit d52db38a5f7d2d25830d37bde60a74434e370f00
Author: Salvatore Bonaccorso <carnil at debian.org>
Date:   Thu Jul 12 17:15:27 2012 +0200

    Unapply patches from master
    
    Git-Dch: Ignore

diff --git a/lib/Net/Server/Coro.pm b/lib/Net/Server/Coro.pm
index 2a20635..2cd0acc 100644
--- a/lib/Net/Server/Coro.pm
+++ b/lib/Net/Server/Coro.pm
@@ -50,8 +50,6 @@ usage details.
 Create new Net::Server::Coro object. It accepts these parameters (in
 addition to L<Net::Server> parameters):
 
-=over
-
 =item server_cert
 
 Path to the SSL certificate that the server should use. This can be
@@ -64,8 +62,6 @@ Path to the SSL certificate key that the server should use. This can
 be either relative or absolute path.  Defaults to
 F<certs/server-key.pem>
 
-=back
-
 =cut
 
 sub new {
@@ -102,7 +98,7 @@ sub proto_object {
     my $self = shift;
     my ($host, $port, $proto) = @_;
 
-    my $is_ssl = (defined($proto) and ($proto eq "SSL" or $proto eq "SSLEAY"));
+    my $is_ssl = ($proto eq "SSL" or $proto eq "SSLEAY");
     my $socket = $self->SUPER::proto_object(
         $host, $port, $is_ssl ? "TCP" : $proto
     );

-- 
co-operative multithreaded server using Coro



More information about the Pkg-perl-cvs-commits mailing list