[MOBY-guts] biomoby commit

Eddie Kawas kawas at dev.open-bio.org
Wed Apr 30 16:53:19 UTC 2008


kawas
Wed Apr 30 12:53:19 EDT 2008
Update of /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache
In directory dev.open-bio.org:/tmp/cvs-serv13362/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache

Modified Files:
	NamespaceCache.pm 
Log Message:
added a check for situations when there is nothing in the ontology. This was causing an error before and now empty rdf is returned.
moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache NamespaceCache.pm,1.2,1.3
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache/NamespaceCache.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache/NamespaceCache.pm	2008/02/21 17:15:40	1.2
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Ontologies/Cache/NamespaceCache.pm	2008/04/30 16:53:19	1.3
@@ -20,6 +20,7 @@
 
 use Fcntl ':flock';
 
+use MOBY::RDF::Utils;
 use MOBY::RDF::Ontologies::Namespaces;
 use MOBY::RDF::Ontologies::Cache::CacheUtils;
 use MOBY::Client::Central;
@@ -446,7 +447,8 @@
 				}
 
 			}
-			$xml = $doc->toString();
+			$xml = $doc->toString() if $doc;
+			$xml = new MOBY::RDF::Utils->empty_rdf unless $doc;
 
 			# save new RDF file
 			open( FILE, ">$file" )




More information about the MOBY-guts mailing list