Subject: | Bug in retrieveService() MOBY::Central |
Hello Eddi,
How are you?
I am Jose RodrÃguez, a member of INB (www.inab.org).
We have found two small bugs in MOBY in Perl, to be precise in the sub sub retrieveService()
// line 2621 (MOBY::Central)
1. If there is not services, "retrieveService()" should be return "<Service/>" instead of "
<Services/>".
2. In the following lines:
my $servlsid = $SI->lsid;
my $wsdls;
return "<Service/>" unless ($SI);
If $SI is not defined, it would be an error. So, to fix it.
return "<Service/>" unless ($SI);
my $servlsid = $SI->lsid;
my $wsdls;
We don't mind to be in charge of MOBY code of CPAN but we need you transfer the module.
Is that possible?
I have written to Mark talking about this.
Best Regards,
J