From a3b3e0d4c48a85cb411ac5059a1d85906d0c97de Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 2 Feb 2021 11:46:57 +0000 Subject: pktop: fix potential undefined var In case we have other bugs in our code. --- lib/PublicInbox/PktOp.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/PublicInbox/PktOp.pm') diff --git a/lib/PublicInbox/PktOp.pm b/lib/PublicInbox/PktOp.pm index 12839e71..59b37ff8 100644 --- a/lib/PublicInbox/PktOp.pm +++ b/lib/PublicInbox/PktOp.pm @@ -58,7 +58,7 @@ sub event_step { die "recv: $!"; } my ($cmd, $pargs) = split(/\0/, $msg, 2); - my $op = $self->{ops}->{$cmd // $msg}; + my $op = $self->{ops}->{$cmd //= $msg}; die "BUG: unknown message: `$cmd'" unless $op; my ($sub, @args) = @$op; $sub->(@args, $pargs ? ipc_thaw($pargs) : ()); -- cgit v1.2.3-24-ge0c7