Show
Ignore:
Timestamp:
08.01.2013 19:34:57 (7 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 modified

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");