diff options
Diffstat (limited to 'ext/Pod-Html/lib/Pod/Html.pm')
-rw-r--r-- | ext/Pod-Html/lib/Pod/Html.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/Pod-Html/lib/Pod/Html.pm b/ext/Pod-Html/lib/Pod/Html.pm index a3232bc323..708f64625f 100644 --- a/ext/Pod-Html/lib/Pod/Html.pm +++ b/ext/Pod-Html/lib/Pod/Html.pm @@ -324,7 +324,9 @@ sub init_globals { sub process_options { my ($globals, $opts) = @_; - @{$globals->{Podpath}} = split(":", $opts->{podpath}) if defined $opts->{podpath}; + $globals->{Podpath} = (defined $opts->{podpath}) + ? [ split(":", $opts->{podpath}) ] + : []; $globals->{Backlink} = $opts->{backlink} if defined $opts->{backlink}; $globals->{Cachedir} = unixify($opts->{cachedir}) if defined $opts->{cachedir}; |