[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Sun Apr  4 15:08:41 EDT 2004
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv29446/MOBY

Modified Files:
	Central.pm 
Log Message:
bug in the registration object - it should return LSID's in the 'id' tag.  I think it now does this properly

moby-live/Perl/MOBY Central.pm,1.124,1.125
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Central.pm,v
retrieving revision 1.124
retrieving revision 1.125
diff -u -r1.124 -r1.125
--- /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2004/04/04 18:53:13	1.124
+++ /home/repository/moby/moby-live/Perl/MOBY/Central.pm	2004/04/04 19:08:41	1.125
@@ -109,7 +109,7 @@
 
 sub Registration {
 	my ( $details) = @_;
-	my $id = $details->{registration_id};
+	my $id = $details->{id};
 	my $success = $details->{success};
 	my $message = $details->{message};