Changeset 34954


Ignore:
Timestamp:
2021-03-02T15:17:20+13:00 (3 years ago)
Author:
anupama
Message:

The newer EXIF that was committed introduced some additional timestamped fields that need to be ignored by diffcol.

Location:
other-projects/nightly-tasks/diffcol/trunk/diffcol
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • other-projects/nightly-tasks/diffcol/trunk/diffcol/diffcol.pl

    r34417 r34954  
    641641    {
    642642        # allow for a namespace prefix to <Metadata> as happens in GreenstoneMETS docmets.xml files, e.g. <gsdl3:Metadata></gsdl3:Metadata>
    643         my $ignore_line_re = "<(.*?:)?Metadata name=\"(lastmodified|lastmodifieddate|oailastmodified|oailastmodifieddate|ex.File.FileModifyDate|ex.File.FilePermissions|ImageSize|FileSize|ex.Composite.LightValue)\">.*</(.*?:)?Metadata>\\s*\\n*";
     643        my $ignore_line_re = "<(.*?:)?Metadata name=\"(lastmodified|lastmodifieddate|oailastmodified|oailastmodifieddate|ex.File.FileModifyDate|ex.File.FilePermissions|ex.File.FileAccessDate|ex.File.FileInodeChangeDate|ImageSize|FileSize|ex.Composite.LightValue)\">.*</(.*?:)?Metadata>\\s*\\n*";
    644644       
    645645        my $strResult;
  • other-projects/nightly-tasks/diffcol/trunk/diffcol/gdbdiff.pm

    r29495 r34954  
    9090    # The total_numbytes field can vary depending on how many backslashes exist in the urls in the main body text, as each
    9191    # of these windows slashes get escaped with another backslash, and the resulting string is used as key into rel link db
    92     my $ignore_line_re = "\n<(FileSize|lastmodified|lastmodifieddate|oailastmodified|oailastmodifieddate|ex.File.FileModifyDate|ex.File.FilePermissions|total_numbytes|ex.Composite.LightValue)>([^\n])*";
     92    my $ignore_line_re = "\n<(FileSize|lastmodified|lastmodifieddate|oailastmodified|oailastmodifieddate|ex.File.FileModifyDate|ex.File.FilePermissions|ex.File.FileAccessDate|ex.File.FileInodeChangeDate|total_numbytes|ex.Composite.LightValue)>([^\n])*";
    9393    $model_text =~ s/$ignore_line_re//g;
    9494    $test_text =~ s/$ignore_line_re//g;
Note: See TracChangeset for help on using the changeset viewer.