Author: earle Date: 2006-04-11 03:12:46 +0100 (Tue, 11 Apr 2006) New Revision: 766
Modified: trunk/lib/OpenGuides/RDF.pm Log: Actually apply changes to this module that were alluded to in [765]
Modified: trunk/lib/OpenGuides/RDF.pm =================================================================== --- trunk/lib/OpenGuides/RDF.pm 2006-04-11 01:13:59 UTC (rev 765) +++ trunk/lib/OpenGuides/RDF.pm 2006-04-11 02:12:46 UTC (rev 766) @@ -133,7 +133,13 @@ dc:title} . $self->{site_name} . qq{: $node_name</dc:title> dc:date$timestamp</dc:date> dcterms:modified$timestamp</dcterms:modified> - <dc:contributor foaf:nick="$username" /> + + dc:contributor + <foaf:Person rdf:ID="$username"> + foaf:nick$username</foaf:nick> + </foaf:Person> + </dc:contributor> + <dc:source rdf:resource="$version_indpt_url" /> wiki:version$version</wiki:version> <foaf:topic rdf:resource="#obj" /> @@ -154,13 +160,19 @@ $rdf .= " <postalCode>$postcode</postalCode>\n" if $postcode; $rdf .= " <country>$country</country>\n" if $country;
+ foreach (@locales) + { + my $locale_id = $_; + $locale_id =~ s/ /_/g; + $rdf .= qq{ foaf:based_near - wn:Neighborhood + <wn:Neighborhood rdf:ID="$locale_id"> dc:title$_</dc:title> </wn:Neighborhood> - </foaf:based_near>\n} foreach @locales; - + </foaf:based_near>\n}; + } + if ( $latitude && $longitude ) { $rdf .= qq{ geo:lat$latitude</geo:lat>