[Opensrf-commits] r2024 - in trunk/src/perl: lib/OpenSRF lib/OpenSRF/Transport t (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-09-13 11:44:11 -0400 (Mon, 13 Sep 2010)
New Revision: 2024

Modified:
   trunk/src/perl/lib/OpenSRF/System.pm
   trunk/src/perl/lib/OpenSRF/Transport.pm
   trunk/src/perl/lib/OpenSRF/Transport/Listener.pm
   trunk/src/perl/lib/OpenSRF/Transport/SlimJabber.pm
   trunk/src/perl/t/07-Transport.t
Log:
removing vestigial references to Inbound.pm, which no longer exists in the repository.  this also removes get/set_listener, which were never taken advantage of and are no longer of use since the listener is thoroughly hard-coded into the opensrf stack now

Modified: trunk/src/perl/lib/OpenSRF/System.pm
===================================================================
--- trunk/src/perl/lib/OpenSRF/System.pm	2010-09-09 17:09:42 UTC (rev 2023)
+++ trunk/src/perl/lib/OpenSRF/System.pm	2010-09-13 15:44:11 UTC (rev 2024)
@@ -34,7 +34,6 @@
 	OpenSRF::Utils::JSON->register_class_hint(name => "OpenSRF::Application", hint => "method", type => "hash");
 	OpenSRF::Transport->message_envelope("OpenSRF::Transport::SlimJabber::MessageWrapper");
 	OpenSRF::Transport::PeerHandle->set_peer_client("OpenSRF::Transport::SlimJabber::PeerConnection");
-	OpenSRF::Transport::Listener->set_listener("OpenSRF::Transport::SlimJabber::Inbound");
 	OpenSRF::Application->server_class('client');
 }
 

Modified: trunk/src/perl/lib/OpenSRF/Transport/Listener.pm
===================================================================
--- trunk/src/perl/lib/OpenSRF/Transport/Listener.pm	2010-09-09 17:09:42 UTC (rev 2023)
+++ trunk/src/perl/lib/OpenSRF/Transport/Listener.pm	2010-09-13 15:44:11 UTC (rev 2024)
@@ -1,8 +1,6 @@
 package OpenSRF::Transport::Listener;
 use base 'OpenSRF';
 use OpenSRF::Utils::Logger qw(:level);
-use OpenSRF::Transport::SlimJabber::Inbound;
-use base 'OpenSRF::Transport::SlimJabber::Inbound';
 
 =head1 Description
 
@@ -20,26 +18,4 @@
 
 =cut
 
-=head2 set_listener()
-
-Sets my superclass.  Pass in a string representing the perl module
-(e.g. OpenSRF::Transport::Jabber::JInbound) to be used as the
-superclass and it will be pushed onto @ISA.
-
-=cut
-
-sub set_listener {
-	my( $class, $listener ) = @_;
-	OpenSRF::Utils::Logger->debug("Loading Listener $listener");
-	if( $listener ) {
-		$listener->use;
-		if( $@ ) {
-			OpenSRF::Utils::Logger->error(
-					"Unable to set transport listener: $@", ERROR );
-		}
-		unshift @ISA, $listener;
-	}
-}
-
-
 1;

Modified: trunk/src/perl/lib/OpenSRF/Transport/SlimJabber.pm
===================================================================
--- trunk/src/perl/lib/OpenSRF/Transport/SlimJabber.pm	2010-09-09 17:09:42 UTC (rev 2023)
+++ trunk/src/perl/lib/OpenSRF/Transport/SlimJabber.pm	2010-09-13 15:44:11 UTC (rev 2024)
@@ -9,8 +9,6 @@
 =cut
 
 
-sub get_listener { return "OpenSRF::Transport::SlimJabber::Inbound"; }
-
 sub get_peer_client { return "OpenSRF::Transport::SlimJabber::PeerConnection"; }
 
 sub get_msg_envelope { return "OpenSRF::Transport::SlimJabber::MessageWrapper"; }

Modified: trunk/src/perl/lib/OpenSRF/Transport.pm
===================================================================
--- trunk/src/perl/lib/OpenSRF/Transport.pm	2010-09-09 17:09:42 UTC (rev 2023)
+++ trunk/src/perl/lib/OpenSRF/Transport.pm	2010-09-13 15:44:11 UTC (rev 2024)
@@ -13,15 +13,6 @@
 # --- These must be implemented by all Transport subclasses
 # -------------------------------------------
 
-=head2 get_listener
-
-Returns the package name of the package the system will use to 
-gather incoming requests
-
-=cut
-
-sub get_listener { shift()->alert_abstract(); }
-
 =head2 get_peer_client
 
 Returns the name of the package responsible for client communication

Modified: trunk/src/perl/t/07-Transport.t
===================================================================
--- trunk/src/perl/t/07-Transport.t	2010-09-09 17:09:42 UTC (rev 2023)
+++ trunk/src/perl/t/07-Transport.t	2010-09-13 15:44:11 UTC (rev 2024)
@@ -10,7 +10,6 @@
 use_ok( 'OpenSRF::Transport::PeerHandle' );
 use_ok( 'OpenSRF::Transport::SlimJabber' );
 use_ok( 'OpenSRF::Transport::SlimJabber::Client' );
-use_ok( 'OpenSRF::Transport::SlimJabber::Inbound' );
 use_ok( 'OpenSRF::Transport::SlimJabber::MessageWrapper' );
 use_ok( 'OpenSRF::Transport::SlimJabber::PeerConnection' );
 use_ok( 'OpenSRF::Transport::SlimJabber::XMPPMessage' );