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
|
