Changeset 735

Show
Ignore:
Timestamp:
12/20/06 17:03:58 (2 years ago)
Author:
mart
Message:

Move the Connection class for ::Component::External to ::Connection::ComponentIn for consistency with everything else, since ::Component::External is part of the core anyway.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/DJabberd/lib/DJabberd/Component/External.pm

    r730 r735  
    4141use DJabberd::Log; 
    4242use DJabberd::Util qw(exml); 
    43 use DJabberd::Component::External::Connection; 
     43use DJabberd::Connection::ComponentIn; 
    4444use IO::Socket::UNIX; 
    4545use IO::Socket::INET; 
    …… 
    178178        } 
    179179 
    180         my $connection = DJabberd::Component::External::Connection->new($csock, $vhost->server, $self); 
     180        my $connection = DJabberd::Connection::ComponentIn->new($csock, $vhost->server, $self); 
    181181        $connection->watch_read(1); 
    182182        $self->{connection} = $connection; 

  • trunk/DJabberd/lib/DJabberd/Connection/ComponentIn.pm

    r731 r735  
    22=head1 NAME 
    33 
    4 DJabberd::Component::External::Component - Connection component for DJabberd::Component::External 
     4DJabberd::Connection::ComponentIn - JEP-0114 Server Connection 
    55 
    66=head1 INTRODUCTION 
    77 
    88This class provides the connection and stream handling implementation for the 
    9 DJabberd component DJabberd::Component::External. It is of no interest on its own. 
     9DJabberd component interface DJabberd::Component::External. It is of little interest on its own. 
    1010 
    1111=head1 LICENCE 
    …… 
    1818=cut 
    1919 
    20 package DJabberd::Component::External::Connection; 
     20package DJabberd::Connection::ComponentIn; 
    2121use strict; 
    2222use base 'DJabberd::Connection'; 
    …… 
    5959 
    6060sub on_stream_start { 
    61     my DJabberd::Component::External::Connection $self = shift; 
     61    my DJabberd::Connection::ComponentIn $self = shift; 
    6262    my $ss = shift; 
    6363    return $self->close unless $ss->xmlns eq $self->namespace; # FIXME: should be stream error