Changeset 27393


Ignore:
Timestamp:
05/23/13 12:59:21 (8 years ago)
Author:
jmt12
Message:

Replace hardcoded -e with FileUtils::fileExists() call and util::rm() with FileUtils::removeFiles() call

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/doc.pm

    r27350 r27393  
    9292        # Use the FileUtil library methods as they are aware of more special
    9393        # cases such as HDFS [jmt12]
    94     ##if (&util::file_exists($source_filename)) {
    95     if (-e $source_filename) {
     94    if (&FileUtils::fileExists($source_filename))
     95        {
    9696        # See if we can do better for Windows with a filename
    9797        if ($ENV{'GSDLOS'} =~ /^windows$/i) {
     
    538538        }
    539539        $OID = $self->_calc_OID ($filename);
    540         &util::rm ($filename);
     540        &FileUtils::removeFiles($filename);
    541541        }
    542542    }
Note: See TracChangeset for help on using the changeset viewer.