[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Mon Oct 22 17:19:21 EDT 2007
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory dev.open-bio.org:/tmp/cvs-serv18051/MOBY

Modified Files:
	OntologyServer.pm 
Log Message:
fixing Relationships code
moby-live/Perl/MOBY OntologyServer.pm,1.106,1.107
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm,v
retrieving revision 1.106
retrieving revision 1.107
diff -u -r1.106 -r1.107
--- /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm	2007/10/22 21:15:37	1.106
+++ /home/repository/moby/moby-live/Perl/MOBY/OntologyServer.pm	2007/10/22 21:19:21	1.107
@@ -1379,7 +1379,7 @@
     # enhance details with information about relationships and build result hash
     foreach my $entityId (@entityResultList) {
       # add articleName slot if necessary
-      next if $details->{$entityId};  # we've already processed this one
+      next if $details->{$entityId}->{'articleName'};  # we've already processed this one
       if ( exists $hasRelDetails->{$entityId} ) {  # the only things that have RelDetails are HASA/HAS EntityIDs
 	foreach my $assert ( keys %{$hasRelDetails->{$entityId}} ) {
 	  # THIS DATA STRUCTURE IS WRONG - IT ASSUMES ONE ARTICLE NAME FOR EACH CONTAINED OBJECT TYPE