added dc:title to classes

Author: micheldumontier

bioportal/bioportal.php

@@ -477,7 +477,9 @@ function OBO2RDF($abbv)
 					$id = str_replace( array("(",")"), array("_",""), $id);
 					$tid = $ns.":".$id;
 				} else if($a[0] == "name") {
-					$buf .= parent::describeClass($tid,addslashes(stripslashes($a[1])));
+					$name = addslashes(stripslashes($a[1]));
+					$buf .= parent::describeClass($tid,$name);
+					$buf .= parent::triplifyString($tid,"dc:title",$name);
 				} else if($a[0] == "is_a") {
 					if(FALSE !== ($pos = strpos($a[1],"!"))) $a[1] = substr($a[1],0,$pos-1);
 					$buf .= parent::triplify($tid,"rdfs:subPropertyOf","obo_vocabulary:".strtolower($a[1]));
@@ -505,7 +507,7 @@ function OBO2RDF($abbv)
 				} else if($a[0] == "name") {
 //					$t = parent::triplifyString($tid,"rdfs:label",str_replace(array("\"", "'"), array("","\\\'"), stripslashes($a[1]))." [$tid]");
 					$label = str_replace(array("\"", "'"), array("","\\\'"), stripslashes($a[1]));
-					$t = parent::describeIndividual($tid,$label,"owl:Class");
+					$t = parent::describeIndividual($tid,$label,"owl:Class",$label);
 					$t .= parent::triplify($tid,"rdfs:isDefinedBy",$ouri);					
 					$min .= $t;
 					$buf .= $t;