Changeset 29817


Ignore:
Timestamp:
03/30/15 13:42:46 (6 years ago)
Author:
kjdon
Message:

removing debug statements

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugins/MetadataXMLPlugin.pm

    r29762 r29817  
    331331        # FileNames must be regex, but we allow \\ for path separator on windows. convert to /
    332332        $target = &util::filepath_regex_to_url_format($target);
     333
     334        # we want proper unicode for the regex, so convert url-encoded chars
    333335        if (&unicode::is_url_encoded($target)) {
    334         print STDERR "***target $target is url encoded ";
    335336        $target = &unicode::url_decode($target);
    336         print STDERR "   new: $target\n";
    337337        }
    338         else {
    339         print STDERR " *** target $target is NOT url encoded\n";
    340         }
     338
    341339        my $file_metadata = &extrametautil::getmetadata($self->{'metadataref'}, $target);
    342340        my $saved_metadata = $self->{'saved_metadata'};
Note: See TracChangeset for help on using the changeset viewer.