Changeset 679


Ignore:
Timestamp:
Oct 9, 2005, 9:32:05 PM (16 years ago)
Author:
Earle Martin
Message:

Add missing address field to RDF output

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/Changes

    r678 r679  
    110.51
     2        Add "address" field that had got missed out from the RDF.
    23        Replace underscores in node names in redirection message with spaces.
    34        Redirection message now links to a rendered version of the old page
  • trunk/lib/OpenGuides/RDF.pm

    r678 r679  
    6666    my $website            = $node_data{metadata}{website}[0]            || '';
    6767    my $opening_hours_text = $node_data{metadata}{opening_hours_text}[0] || '';
     68    my $address            = $node_data{metadata}{address}[0]            || '';
    6869    my $postcode           = $node_data{metadata}{postcode}[0]           || '';
    6970    my $city               = $node_data{metadata}{city}[0]               || $self->{default_city};
     
    9293    my ($is_geospatial, $objType);
    9394
    94     if ($latitude || $longitude || $postcode || @locales) {
     95    if ($os_x || $os_y || $latitude || $longitude || $address || $postcode || @locales) {
    9596        $is_geospatial = 1;
    9697        $objType    = 'geo:SpatialThing';
     
    141142    $rdf .= "\n    <!-- categories -->\n\n" if $catrefs;
    142143    $rdf .= "    <dc:subject>$_</dc:subject>\n" foreach @{$catrefs};
    143     $rdf .= "\n    <!-- address and geospatial data -->\n\n" if $is_geospatial;
    144     $rdf .= "    <city>$city</city>\n"                 if $city     && $is_geospatial;
    145     $rdf .= "    <postalCode>$postcode</postalCode>\n" if $postcode && $is_geospatial;
    146     $rdf .= "    <country>$country</country>\n"        if $country  && $is_geospatial;
    147 
    148     $rdf .= qq{
     144   
     145    if ($is_geospatial)
     146    {
     147      $rdf .= "\n    <!-- address and geospatial data -->\n\n" if $is_geospatial;
     148      $rdf .= "    <city>$city</city>\n"                 if $city;
     149      $rdf .= "    <postalCode>$postcode</postalCode>\n" if $postcode;
     150      $rdf .= "    <country>$country</country>\n"        if $country;
     151
     152      $rdf .= qq{
    149153    <foaf:based_near>
    150154      <wn:Neighborhood>
     
    153157    </foaf:based_near>\n} foreach @locales;
    154158
    155     if ( $latitude && $longitude ) {
    156         $rdf .= qq{
     159      if ( $latitude && $longitude ) {
     160          $rdf .= qq{
    157161    <geo:lat>$latitude</geo:lat>
    158162    <geo:long>$longitude</geo:long>\n};
    159     }
    160 
    161     if ( $os_x && $os_y ) {
    162         $rdf .= qq{
     163      }
     164
     165      if ( $os_x && $os_y ) {
     166          $rdf .= qq{
    163167    <os:x>$os_x</os:x>
    164168    <os:y>$os_y</os:y>};
    165     }
    166 
     169      }
     170    }
     171   
    167172    $rdf .= "\n\n    <!-- contact information -->\n\n" if ($phone || $fax || $website || $opening_hours_text);
    168173    $rdf .= "    <phone>$phone</phone>\n"                              if $phone;
Note: See TracChangeset for help on using the changeset viewer.