Changeset 12185


Ignore:
Timestamp:
2006-07-13T09:36:41+12:00 (18 years ago)
Author:
mdewsnip
Message:

The institution best place images now link to the place's page.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/cic-hcap/perllib/plugins/CICPlug.pm

    r12182 r12185  
    307307
    308308    # Prepare SQL statement for getting the Institution best place image location
    309     my $institution_best_place_image_location_sql_statement = "SELECT Location FROM tblImages WHERE FileType=1 AND FileName=?";
     309    my $institution_best_place_image_location_sql_statement = "SELECT Location,Entry_ID FROM tblImages WHERE FileType=1 AND FileName=?";
    310310    my $institution_best_place_image_location_sql_handle = $dbh->prepare($institution_best_place_image_location_sql_statement);
    311311    $institution_best_place_image_location_sql_handle->{LongReadLen} = 65536;
     
    371371        # Get the file location of the best place image for this institution
    372372        $institution_best_place_image_location_sql_handle->execute($institution_best_place_image_name) or die "Could not execute SQL statement.";
    373         my $institution_best_place_image_location = $institution_best_place_image_location_sql_handle->fetchrow();
     373        my $institution_best_place_image_hashref = $institution_best_place_image_location_sql_handle->fetchrow_hashref();
     374
     375        my $institution_best_place_image_location = $institution_best_place_image_hashref->{"Location"};
    374376        if (!defined($institution_best_place_image_location) || $institution_best_place_image_location eq "") {
    375377        print STDERR "<ProcessingError n='Institution $institution_id' p='CICPlug' r='Could not match best image $institution_best_place_image_name to a file'>\n" if ($self->{'gli'});
     
    389391        }
    390392
     393        my $institution_best_place_id = $institution_best_place_image_hashref->{"Entry_ID"};
    391394        my $institution_best_place_image_medium_file_href = $self->generate_place_image_variant($institution_doc_obj, $institution_best_place_image_location, "medium");
    392         my $institution_best_place_image_large_file_href = $self->generate_place_image_variant($institution_doc_obj, $institution_best_place_image_location, "large");
    393         &new_metadata_entry($institution_doc_obj, "InstitutionBestPlaceImageHTML", "<a href=\"$institution_best_place_image_large_file_href\"><img src=\"$institution_best_place_image_medium_file_href\"/><br /><span class=\"cictext\">$institution_best_place_image_name</span></a>");
     395        &new_metadata_entry($institution_doc_obj, "InstitutionBestPlaceImageHTML", "<a href=\"_gwcgi_?a=d&d=p$institution_best_place_id\"><img src=\"$institution_best_place_image_medium_file_href\"/><br /><span class=\"cictext\">$institution_best_place_image_name</span></a>");
    394396    }
    395397
Note: See TracChangeset for help on using the changeset viewer.