Changeset 20763


Ignore:
Timestamp:
2009-09-30T13:49:54+13:00 (13 years ago)
Author:
kjdon
Message:

making the reverse lookup contain full paths not relative ones

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/plugouts/BasePlugout.pm

    r20747 r20763  
    682682    if (-e $real_filename) {
    683683
    684         if (defined $collect_dir) {
    685         my $collect_dir_re_safe = $collect_dir;
    686         $collect_dir_re_safe =~ s/\\/\\\\/g;
    687         $collect_dir_re_safe =~ s/\./\\./g;
    688 
    689         $real_filename =~ s/^$collect_dir_re_safe//;
    690         }
     684#       if (defined $collect_dir) {
     685#       my $collect_dir_re_safe = $collect_dir;
     686#       $collect_dir_re_safe =~ s/\\/\\\\/g;
     687#       $collect_dir_re_safe =~ s/\./\\./g;##
     688
     689#       $real_filename =~ s/^$collect_dir_re_safe//;
     690#       }
    691691
    692692        $reverse_lookups->{$real_filename} = 1;
Note: See TracChangeset for help on using the changeset viewer.