2 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index a9f7b232a..cf417783f 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,6 +1,8 @@
 - finish-install:
   o finit support
   o give console rights for current session when renaming user
+- drakdvb:
+  o install w_scan if needed (#48242)
 
 Version 11.91 - 25 February 2009
 
diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb
index eb5d4909c..448f82c9e 100755
--- a/perl-install/standalone/drakdvb
+++ b/perl-install/standalone/drakdvb
@@ -87,6 +87,7 @@ 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);