Changeset 20763 for gsdl

Timestamp:

2009-09-30T13:49:54+13:00 (15 years ago)

Author:

kjdon

Message:

making the reverse lookup contain full paths not relative ones

File:

• gsdl/trunk/perllib/plugouts/BasePlugout.pm (modified) (1 diff)

gsdl/trunk/perllib/plugouts/BasePlugout.pm

@@ -682 +682 @@
     if (-e $real_filename) {
 
-        if (defined $collect_dir) {
-        my $collect_dir_re_safe = $collect_dir;
-        $collect_dir_re_safe =~ s/\\/\\\\/g;
-        $collect_dir_re_safe =~ s/\./\\./g;
-
-        $real_filename =~ s/^$collect_dir_re_safe//;
-        }
+#       if (defined $collect_dir) {
+#       my $collect_dir_re_safe = $collect_dir;
+#       $collect_dir_re_safe =~ s/\\/\\\\/g;
+#       $collect_dir_re_safe =~ s/\./\\./g;##
+
+#       $real_filename =~ s/^$collect_dir_re_safe//;
+#       }
 
         $reverse_lookups->{$real_filename} = 1;