From d6b4dc2662730a7857ff8be367030d39c312a701 Mon Sep 17 00:00:00 2001 From: James E Keenan Date: Sat, 14 Aug 2021 15:41:42 +0000 Subject: [PATCH] Pod::Html: assign directly to array ref This restores the thrust of c0ac28175b, which got zapped when resolving merge conflicts. --- ext/Pod-Html/lib/Pod/Html.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/ext/Pod-Html/lib/Pod/Html.pm b/ext/Pod-Html/lib/Pod/Html.pm index 9b44a09173a6..be9ec5f0393d 100644 --- a/ext/Pod-Html/lib/Pod/Html.pm +++ b/ext/Pod-Html/lib/Pod/Html.pm @@ -325,7 +325,9 @@ sub init_globals { sub process_options { my ($self, $opts) = @_; - @{$self->{Podpath}} = split(":", $opts->{podpath}) if defined $opts->{podpath}; + $self->{Podpath} = (defined $opts->{podpath}) + ? [ split(":", $opts->{podpath}) ] + : []; $self->{Backlink} = $opts->{backlink} if defined $opts->{backlink}; $self->{Cachedir} = unixify($opts->{cachedir}) if defined $opts->{cachedir};