Changeset 13179

Timestamp:

2006-10-27T16:34:26+13:00 (18 years ago)

Author:

mdewsnip

Message:

Fixed an "uninitialized value" error.

File:

• trunk/gsdl/cgi-bin/gliserver.pl (modified) (1 diff)

trunk/gsdl/cgi-bin/gliserver.pl

@@ -524 +524 @@
 
     foreach my $cgi_arg_name ($gsdl_cgi->param) {
-    my $cgi_arg_value = $gsdl_cgi->safe_val($gsdl_cgi->clean_param($cgi_arg_name));
+    my $cgi_arg_value = $gsdl_cgi->clean_param($cgi_arg_name) || "";
+    $cgi_arg_value = $gsdl_cgi->safe_val($cgi_arg_value);
     if ($cgi_arg_value eq "") {
         $perl_args = "-$cgi_arg_name " . $perl_args;