[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Sat Nov  1 09:25:15 EST 2003
Update of /home/repository/moby/moby-live/Perl/lsid/authority
In directory pub.open-bio.org:/tmp/cvs-serv32389

Modified Files:
	PredicateResolver.pm 
Log Message:
compensating for ambiguity v.v. whether or not LSID's are case sensitive.  Will chose one or the other when I get confirmation from the horses mouth

moby-live/Perl/lsid/authority PredicateResolver.pm,1.2,1.3
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/lsid/authority/PredicateResolver.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- /home/repository/moby/moby-live/Perl/lsid/authority/PredicateResolver.pm	2003/11/01 14:06:35	1.2
+++ /home/repository/moby/moby-live/Perl/lsid/authority/PredicateResolver.pm	2003/11/01 14:25:15	1.3
@@ -15,6 +15,7 @@
 
 my $known_predicates = {
     mobyOntology => 'A phrase representing one of the bioMoby ontologies.',
+    mobyontology => 'A phrase representing one of the bioMoby ontologies.',
 };
 
 sub resolve_mobyPredicate {
@@ -31,7 +32,7 @@
 	# e.g. urn:lsid:biomoby.org:rdfpredicates:mobyOntology
 
     unless ($known_predicates->{$obj}){
-        _die('LSID '.($lsid->as_string).' Does not exist', 404);
+        _die('LSID '.($lsid->as_string).' ($obj) Does not exist', 404);
     }
 
     # LSID is now fully validated.  Carry on with metadata.