Avoid 'Can't use an undefined value as an ARRAY reference message' wh…

…en no links are found in the document.
gisle · Sep 5, 1996 · 09552bf · 09552bf
1 parent b4823db
commit 09552bf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/HTML/LinkExtor.pm b/lib/HTML/LinkExtor.pm
@@ -114,7 +114,7 @@ provided when the L<HTML::LinkExtor> was created.
 sub links
 {
     my $self = shift;
-    @{$self->{'links'}}
+    exists($self->{'links'}) ? @{$self->{'links'}} : ();
 }
 
 # We override the parse_file() method so that we can clear the links