From: Eric Wong <e@80x24.org>
Date: Sun, 20 Dec 2020 06:30:15 +0000 (+0000)
Subject: daemon: kill_workers: eliminate unnecessary loop
X-Git-Tag: v1.7.0~1525
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=e77241850763dea9995381f3c0c7b354aa791cc0;p=public-inbox.git

daemon: kill_workers: eliminate unnecessary loop

The `kill' perl op takes multiple PIDs, so there's no need to
iterate through the %pids hash.
---

diff --git a/lib/PublicInbox/Daemon.pm b/lib/PublicInbox/Daemon.pm
index eeac3bd2..1762be0b 100644
--- a/lib/PublicInbox/Daemon.pm
+++ b/lib/PublicInbox/Daemon.pm
@@ -419,11 +419,8 @@ sub upgrade { # $_[0] = signal name or number (unused)
 }
 
 sub kill_workers ($) {
-	my ($s) = @_;
-
-	while (my ($pid, $id) = each %pids) {
-		kill $s, $pid;
-	}
+	my ($sig) = @_;
+	kill $sig, keys(%pids);
 }
 
 sub upgrade_aborted ($) {