summaryrefslogtreecommitdiffstats
path: root/perl-install/scanner.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-01-16 16:50:23 +0000
committerThierry Vignaud <tv@mandriva.org>2009-01-16 16:50:23 +0000
commit4e3c73e5376bda898a6c6c9bbcc79029cf3feef8 (patch)
tree6014dfe9b463c9338afbbabf4d9c96cbcfb8615d /perl-install/scanner.pm
parentd17f0d0d05b0f08357b4e47402a9069fbbe84183 (diff)
downloaddrakx-4e3c73e5376bda898a6c6c9bbcc79029cf3feef8.tar
drakx-4e3c73e5376bda898a6c6c9bbcc79029cf3feef8.tar.gz
drakx-4e3c73e5376bda898a6c6c9bbcc79029cf3feef8.tar.bz2
drakx-4e3c73e5376bda898a6c6c9bbcc79029cf3feef8.tar.xz
drakx-4e3c73e5376bda898a6c6c9bbcc79029cf3feef8.zip
(installfirmware) fix a crash when installing firmware (#40738)
Diffstat (limited to 'perl-install/scanner.pm')
-rw-r--r--perl-install/scanner.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm
index ab8ec23f4..6fa73b18e 100644
--- a/perl-install/scanner.pm
+++ b/perl-install/scanner.pm
@@ -88,6 +88,7 @@ sub installfirmware {
# Install the firmware file in /usr/share/sane/firmware
my ($firmware, $backend) = @_;
return "" if !$firmware;
+ $in ||= interactive->vnew;
# Install firmware
run_program::rooted($::prefix, "mkdir", "-p",
"/usr/share/sane/firmware") or do {