ask only one time to install packages (suggested by pterjan)

1 files changed, 2 insertions, 5 deletions

diff --git a/bin/drakguard b/bin/drakguard
index e83b8cc..ba5bd94 100755
--- a/bin/drakguard
+++ b/bin/drakguard
@@ -195,11 +195,8 @@ sub save() {
     my $guardian_port = 8080;
     my $guardian_user = 'dansguardian';
 
-    $enable &&
-      $in->do_pkgs->ensure_binary_is_installed('shorewall', 'shorewall') &&
-      $in->do_pkgs->ensure_is_installed('squid', '/usr/sbin/squid') &&
-      $in->do_pkgs->ensure_is_installed('dansguardian', '/usr/sbin/dansguardian')
-        or quit_gui();
+    $enable && $in->do_pkgs->ensure_are_installed([ qw(shorewall squid dansguardian) ])
+      or quit_gui();
 
     $_->{apply}(map { $_->[0] } @{$_->{list}{data}}) foreach @url_lists;
     write_dansguardian();