1 package OpenSRF::Transport::Listener;
3 use OpenSRF::Utils::Logger qw(:level);
8 This is the empty class that acts as the subclass of the transport listener. My API
12 create a new Listener with appname $app
15 Perform any transport layer connections/authentication.
18 Block, wait for, and process incoming messages
24 Sets my superclass. Pass in a string representing the perl module
25 (e.g. OpenSRF::Transport::Jabber::JInbound) to be used as the
26 superclass and it will be pushed onto @ISA.
31 my( $class, $listener ) = @_;
33 eval "use $listener;";
35 OpenSRF::Utils::Logger->error(
36 "Unable to set transport listener: $@", ERROR );
38 unshift @ISA, $listener;