Update of /cvsroot/perl-ldap/ldap/lib/Net/LDAP
In directory usw-pr-cvs1:/tmp/cvs-serv21015/lib/Net/LDAP
Modified Files:
DSML.pm
Log Message:
Need to end the dsml:attribute-type element
Index: DSML.pm
===================================================================
RCS file: /cvsroot/perl-ldap/ldap/lib/Net/LDAP/DSML.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- DSML.pm 18 Jul 2002 18:19:43 -0000 1.15
+++ DSML.pm 18 Jul 2002 20:04:07 -0000 1.16
@@ -516,6 +516,8 @@
$handler->characters({Data => $syn});
$handler->end_element(\%data);
}
+ @data{qw(Name LocalName)} = qw(dsml:attribute-type attribute-type);
+ $handler->end_element(\%data);
}
foreach my $oc ($schema->all_objectclasses) {
|