Changeset 27482 for main/trunk/greenstone2/perllib/inexport.pm
- Timestamp:
- 2013-05-27T12:50:19+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/inexport.pm
r27394 r27482 274 274 } 275 275 276 # @todo &FileUtils::sanitizePath($archivedir) [jmt12]277 $archivedir =~ s/[\\\/]+/\//g;278 $archivedir =~ s/\/$//;276 $archivedir = &FileUtils::sanitizePath($archivedir) 277 #$archivedir =~ s/[\\\/]+/\//g; 278 #$archivedir =~ s/\/$//; 279 279 $self->{'archivedir'} = $archivedir; 280 280 … … 441 441 } 442 442 443 $self->{'manifest'} =~ s/[\\\/]+/\//g; 444 $self->{'manifest'} =~ s/\/$//; 443 $self->{'manifest'} = &FileUtils::sanitizePath($self->{'manifest'}); 444 #$self->{'manifest'} =~ s/[\\\/]+/\//g; 445 #$self->{'manifest'} =~ s/\/$//; 445 446 446 447 $manifest_lookup->parse($manifest_filename);
Note:
See TracChangeset
for help on using the changeset viewer.