Changeset 26597


Ignore:
Timestamp:
01/08/13 19:34:57 (8 years ago)
Author:
davidb
Message:

The name of the collection and the last frame number are now written out to the frame.inf file. Previously, the full file path of the last frame was being written out as the last frame name.

Location:
gs3-extensions/html-to-expeditee/trunk/src/perllib
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • gs3-extensions/html-to-expeditee/trunk/src/perllib/ExpediteeFrameIO.pm

    r26596 r26597  
    608608{
    609609    my $self = shift @_;
    610     my ($last_frame_number) = @_;
     610    my ($last_frame_number,$collect) = @_;
    611611
    612612    my $filename = &util::filename_cat($self->{'output_dir'},"frame.inf");
     
    618618
    619619    #writes frameset name concatenated with last frame number in the set to the frame.inf file.
    620         my $getFramesetName = $self->{'output_dir'};
    621        
     620     #   my $getFramesetName = $self->{'output_dir'};
     621   
     622    #use collection name rather than the directory name where the frameset is stored, when saving the last frame name/number to the frame.inf file.
     623    print FNOUT "$collect"."$last_frame_number";
    622624   
    623625    close(FNOUT);
     
    626628    else {
    627629    print STDERR "ExpediteeFrameIO::saveLastFrameNumber() Failed to open $filename for output\n";
     630   
    628631    $status = 0;
    629632    }
  • gs3-extensions/html-to-expeditee/trunk/src/perllib/cgiactions/HtmlToExpediteeAction.pm

    r26596 r26597  
    100100   
    101101    # write out next free frame num
    102     $expeditee_frame_io->saveLastFrameNumber($fn);
     102    $expeditee_frame_io->saveLastFrameNumber($fn,$collect);
    103103
    104104    $gsdl_cgi->generate_message("html-to-expeditee saved frame $fn");
Note: See TracChangeset for help on using the changeset viewer.