From 2089fd31e8ece34641e69f4f45059f231ebdf6e9 Mon Sep 17 00:00:00 2001
From: Max Kellermann <max@foo-projects.org>
Date: Tue, 26 Feb 2008 06:19:33 +0000
Subject: [PATCH] initialize {tools} with map()

git-svn-id: svn+ssh://foo-projects.org/var/svn/ferm/trunk@1106 887c3e53-ddf1-0310-8e39-e0d3fab4ed34
---
 src/ferm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/ferm b/src/ferm
index 2eab617..3c21b7b 100755
--- a/src/ferm
+++ b/src/ferm
@@ -667,9 +667,8 @@ sub initialize_domain {
       if $domain =~ /^ip6?$/;
 
     # determine the location of this domain's tools
-    foreach my $tool (@tools) {
-        $domains{$domain}{tools}{$tool} = find_tool("${domain}${tool}");
-    }
+    my %tools = map { $_ => find_tool($domain . $_) } @tools;
+    $domains{$domain}{tools} = \%tools;
 
     # make tables-save tell us about the state of this domain
     # (which tables and chains do exist?), also remember the old
-- 
2.11.4.GIT