[libweasel-perl] 04/24: * '' wants to be an array ref

Robert James Clay jame at rocasa.us
Tue Aug 15 19:16:07 UTC 2017


This is an automated email from the git hooks/post-receive script.

jame-guest pushed a commit to tag v0.02
in repository libweasel-perl.

commit ea9c4eab584613d2e864aba7cafbe103d6c53935
Author: Erik Huelsmann <ehuels at gmail.com>
Date:   Thu Jun 16 09:44:45 2016 +0200

    * '' wants to be an array ref
---
 lib/Weasel/WidgetHandlers.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Weasel/WidgetHandlers.pm b/lib/Weasel/WidgetHandlers.pm
index fbd8cca..420b81d 100644
--- a/lib/Weasel/WidgetHandlers.pm
+++ b/lib/Weasel/WidgetHandlers.pm
@@ -96,7 +96,7 @@ sub _cached_elem_att {
 sub best_match_handler_class {
     my ($driver, $_id, $groups) = @_;
 
-    $groups //= keys %widget_handlers;   # undef --> unrestricted
+    $groups //= [ keys %widget_handlers ];   # undef --> unrestricted
 
     my @matches;
     my $elem_att_cache = {};

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libweasel-perl.git



More information about the Pkg-perl-cvs-commits mailing list