Changeset 19180 for gsdl/trunk/perllib

Timestamp:

2009-04-22T11:22:14+12:00 (15 years ago)

Author:

kjdon

Message:

remove any slashes from OID when generating an archive dir, otherwise may get different directory strucure between windows and linux and not sure that it would work properly like that

File:

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

gsdl/trunk/perllib/plugouts/BasePlugout.pm

@@ -552 +552 @@
    my($working_info,$working_dir,$OID) = @_;      
    
+   
    my $doc_dir = "";
    my $doc_dir_rest = $OID;
+   # remove any \ and / from the OID
+   $doc_dir_rest =~ s/[\\\/]//g;
    my $doc_dir_num = 0;