Changeset 28250 for main/trunk/greenstone2/perllib/download.pm

Timestamp:

2013-09-10T15:37:45+12:00 (11 years ago)

Author:

ak19

Message:

1. Jenny and I fixed an oversight in OAIDownload, thanks to Kathy's suggestion, where an html page's contents used to be inspected for file types specified to be downloaded with GetDocument ONLY if the file extension was htm(l). Now the test is whether the header specifies Content-Type text/html. 2. Deprecated utils functions replaced with their FileUtils equivalents.

File:

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

main/trunk/greenstone2/perllib/download.pm

@@ -44 +44 @@
     if ($ENV{'GSDLCOLLECTDIR'}){
    
-    $coldownloadname = &util::filename_cat($ENV{'GSDLCOLLECTDIR'}, 
+    $coldownloadname = &FileUtils::filenameConcatenate($ENV{'GSDLCOLLECTDIR'}, 
                           "perllib","downloaders", 
                           "${download_name}.pm");
@@ -50 +50 @@
     }
    
-    my $maindownloadname = &util::filename_cat($ENV{'GSDLHOME'},
+    my $maindownloadname = &FileUtils::filenameConcatenate($ENV{'GSDLHOME'},
                            "perllib","downloaders", 
                            "${download_name}.pm");