Changeset 19180
- Timestamp:
- 2009-04-22T11:22:14+12:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugouts/BasePlugout.pm
r18659 r19180 552 552 my($working_info,$working_dir,$OID) = @_; 553 553 554 554 555 my $doc_dir = ""; 555 556 my $doc_dir_rest = $OID; 557 # remove any \ and / from the OID 558 $doc_dir_rest =~ s/[\\\/]//g; 556 559 my $doc_dir_num = 0; 557 560
Note:
See TracChangeset
for help on using the changeset viewer.