Changeset 27393 for main/trunk

Timestamp:

2013-05-23T12:59:21+12:00 (11 years ago)

Author:

jmt12

Message:

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

File:

• main/trunk/greenstone2/perllib/doc.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/doc.pm

@@ -92 +92 @@
         # Use the FileUtil library methods as they are aware of more special
         # cases such as HDFS [jmt12]
-    ##if (&util::file_exists($source_filename)) {
-    if (-e $source_filename) {
+    if (&FileUtils::fileExists($source_filename))
+        {
         # See if we can do better for Windows with a filename
         if ($ENV{'GSDLOS'} =~ /^windows$/i) {
@@ -538 +538 @@
         }
         $OID = $self->_calc_OID ($filename);
-        &util::rm ($filename);
+        &FileUtils::removeFiles($filename);
         }
     }