[Openinteract-commits] CVS: SPOPS/eg/My LDAPConnect.pm,1.1,1.2

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/SPOPS/eg/My
In directory usw-pr-cvs1:/tmp/cvs-serv30023/eg/My

Modified Files:
	LDAPConnect.pm 
Log Message:
cosmetic


Index: LDAPConnect.pm
===================================================================
RCS file: /cvsroot/openinteract/SPOPS/eg/My/LDAPConnect.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** LDAPConnect.pm	2001/10/23 14:25:31	1.1
--- LDAPConnect.pm	2001/10/26 03:21:35	1.2
***************
*** 26,32 ****
  sub global_datasource_handle {
      my ( $class, $connect_key ) = @_;
!     unless ( $connect_key ) {
!         cluck "Cannot retrieve handle without connect key!\n";
!     }
      unless ( $HANDLES{ $connect_key } ) {
          my $ldap_info = $class->connection_info( $connect_key );
--- 26,31 ----
  sub global_datasource_handle {
      my ( $class, $connect_key ) = @_;
!     cluck "Cannot retrieve handle without connect key!\n" unless ( $connect_key );
! 
      unless ( $HANDLES{ $connect_key } ) {
          my $ldap_info = $class->connection_info( $connect_key );