Changeset 17528

Timestamp:

2008-10-13T21:48:48+13:00 (16 years ago)

Author:

ak19

Message:

New subroutine setIsGLI to store whether or not the download is run from within GLI (or from a command prompt). This is necessary since Downloads using Wget that are launched via GLI require sockets to enable premature termination of wget, whereas when downloads are run by executing downloadfrom.pl from the cmd line, the WgetDownload.pm's signal handler for Ctrl-C (SIGINT) is called instead.

File:

• gsdl/trunk/perllib/downloaders/BaseDownload.pm (modified) (1 diff)

gsdl/trunk/perllib/downloaders/BaseDownload.pm

@@ -229 +229 @@
 }
 
+# method to set whether or not we're running the download scripts from GLI
+sub setIsGLI()
+{
+    my ($self, $is_gli) = @_; 
+
+    $self->{'gli'} = $is_gli;
+}
+
 sub error
 {
       my ($strFunctionName,$strError) = @_;
     {
-    print "Error occoured in BaseDownload.pm\n".
+    print "An error occurred in BaseDownload.pm\n".
         "In Function: ".$strFunctionName."\n".
         "Error Message: ".$strError."\n";