Changeset 10111

Timestamp:

2005-06-15T15:07:52+12:00 (19 years ago)

Author:

davidb

Message:

Access to scalar(@$url_array) better protected with 'defined' to ensure
variable exists before the length of it is calculated.

File:

• trunk/gsdl/perllib/plugins/OAIPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/OAIPlug.pm

@@ -176 +176 @@
     
     my $url_array = $metadata->{'URL'};
-    my $num_urls = scalar(@$url_array);
+    my $num_urls = (defined $url_arry) ? scalar(@$url_array) : 0;
     
     my $srcdoc_exists = 0;