From b65c42273a1b729965a1417c952d2c3a6615c47f Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@mandriva.org>
Date: Thu, 26 Feb 2009 18:11:41 +0000
Subject: drakdvb: use do_pkgs directly

---
 perl-install/standalone/drakdvb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/standalone/drakdvb')

diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb
index 448f82c9e..bd1b8dcaa 100755
--- a/perl-install/standalone/drakdvb
+++ b/perl-install/standalone/drakdvb
@@ -60,6 +60,8 @@ sub detect_channels() {
     $channel_list->set_sensitive(0);
     $_->set_sensitive(0) foreach values %buttons;
 
+    $in->do_pkgs->install('w_scan');
+
     gtkflush();
 
     $SIG{CHLD} = sub {
@@ -87,7 +89,6 @@ sub detect_channels() {
     } else {
         $SIG{CHLD} = 'DEFAULT';
         mkdir_p(dirname($config_file));
-        system('/usr/sbin/drakhelp_inst w_scan') unless -e '/usr/bin/w_scan';
         my $ret = system("w_scan -X > $config_file");
         sleep(1);
         POSIX::_exit($ret >> 8);
-- 
cgit v1.2.1