Changeset 13902

Timestamp:

2007-02-13T10:31:08+13:00 (17 years ago)

Author:

shaoqun

Message:

fixed the bug that caused the download web files being stored in the wrong place on linux

File:

• trunk/gsdl/perllib/downloaders/WebDownload.pm (modified) (2 diffs)

trunk/gsdl/perllib/downloaders/WebDownload.pm

@@ -105 +105 @@
       
     # Setup the command for using wget
-    my $cache_dir = "";
-    if ($ENV{'GSDLOS'} eq "windows") {
+     my $cache_dir = "";
+    if ($ENV{'GSDLOS'} eq "windows") {    
     $cache_dir = "-P \"".$hashGeneralOptions->{"cache_dir"}."\" ";
     }
+    else{
+        $cache_dir = "-P ".$hashGeneralOptions->{"cache_dir"};
+    }
+
     #my $cmdWget = "-N -k -x -t 2 -P \"".$hashGeneralOptions->{"cache_dir"}."\" $strWgetOptions $strOptions ".$self->{'url'};
-    my $cmdWget = "-N -k -x -t 2  $strWgetOptions $strOptions $cache_dir " .$self->{'url'};
+    my $cmdWget = "-N -k -x -t 2  $strWgetOptions $strOptions $cache_dir " .$self->{'url'};   
     
     # Download the web pages
@@ -124 +128 @@
     
     # if ($strResponse ne ""){print "$strResponse\n";}
-    
-    print STDERR "Finish download from $self->{'url'}\n";
+     print STDERR "Finish download from $self->{'url'}\n";
 
     print STDERR "<<Finished>>\n";