From 272bec05fd679382cb126b6d10cf157506ce2cee Mon Sep 17 00:00:00 2001
From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Tue, 15 Feb 2005 21:07:52 +0000
Subject: [PATCH] removing old references to OpenSRF::DOM::Element::userAuth

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@61 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perlmods/OpenSRF/DomainObject/oilsMessage.pm | 48 ------------------------
 1 file changed, 48 deletions(-)

diff --git a/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm b/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm
index facc5dc..2ebc774 100644
--- a/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm
+++ b/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm
@@ -16,8 +16,6 @@ use OpenSRF::DomainObject::oilsMessage;
 
 my $msg = OpenSRF::DomainObject::oilsMessage->new( type => 'CONNECT' );
 
-$msg->userAuth( $userAuth_element );
-
 $msg->payload( $domain_object );
 
 =head1 ABSTRACT
@@ -134,31 +132,6 @@ sub payload {
 	return OpenSRF::DOM::upcast($payload)->upcast if ($payload);
 }
 
-=head2 OpenSRF::DomainObject::oilsMessage->userAuth( [$new_userAuth_element] )
-
-=over 4
-
-Sets or gets the userAuth element for this message.  This is used internally by the
-session object.
-
-=back
-
-=cut
-
-sub userAuth {
-	my $self = shift;
-	my $new_ua = shift;
-
-	my ($ua) = $self->getChildrenByTagName('oils:userAuth');
-	if ($new_ua) {
-		$ua = $self->removeChild($ua) if ($ua);
-		$self->appendChild($new_ua);
-		return $new_ua unless ($ua);
-	}
-
-	return $ua;
-}
-
 =head2 OpenSRF::DomainObject::oilsMessage->handler( $session_id )
 
 =over 4
@@ -242,27 +215,6 @@ sub do_server {
 
 		}
 		
-		#unless ($self->userAuth ) {
-		#	$log->debug( "No Authentication information was provided with the initial packet", ERROR );
-		#	my $res = OpenSRF::DomainObject::oilsConnectException->new(
-		#			status => "No Authentication info was provided with initial message" );
-		#	$session->status($res);
-		#	$session->kill_me;
-		#	return 0;
-		#}
-
-		#unless( $self->userAuth->authenticate( $session ) ) {
-		#	my $res = OpenSRF::DomainObject::oilsAuthException->new(
-		#		status => "Authentication Failed for " . $self->userAuth->getAttribute('username') );
-		#	$session->status($res) if $res;
-		#	$session->kill_me;
-		#	return 0;
-		#}
-
-		#$session->client_auth( $self->userAuth );
-
-		$log->debug("We're a server and the user is authenticated",DEBUG);
-
 		my $res = OpenSRF::DomainObject::oilsConnectStatus->new;
 		$session->status($res);
 		$session->state( $session->CONNECTED );
-- 
2.11.0