[perl-ldap-checkins] CVS: ldap/lib/Net/LDAP DSML.pm,1.9,1.10

[Clif H. <ch...@us...>]

Update of /cvsroot/perl-ldap/ldap/lib/Net/LDAP
In directory usw-pr-cvs1:/tmp/cvs-serv21739/ldap/lib/Net/LDAP

Modified Files:
	DSML.pm 
Log Message:

Added close method.  The close method does not do anything, but is called
by the DESTROY method. For some reason the close method was never coded. 
Original DSML writter must have had a reason for doing this, just never 
implement it.



Index: DSML.pm
===================================================================
RCS file: /cvsroot/perl-ldap/ldap/lib/Net/LDAP/DSML.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- DSML.pm	2001/12/25 01:09:47	1.9
+++ DSML.pm	2001/12/29 22:51:14	1.10
@@ -108,6 +108,10 @@
   qq!</dsml:dsml>\n!;
 }
 
+sub close
+{
+my $self = shift;
+}
 sub DESTROY { shift->close }
 
 #transform any entity chararcters