summaryrefslogtreecommitdiffstats
path: root/perl-install/keyboard.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-03-09 15:05:32 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-03-09 15:05:32 +0000
commite97da80fbb639e90ae017d4ef2d39ceb69f59f2b (patch)
tree402292d3ec35ff35f0aca662a9e3a89c4bbd06c7 /perl-install/keyboard.pm
parentc8dd6a00d88910e8029b616d42f8d0683be4290b (diff)
downloaddrakx-e97da80fbb639e90ae017d4ef2d39ceb69f59f2b.tar
drakx-e97da80fbb639e90ae017d4ef2d39ceb69f59f2b.tar.gz
drakx-e97da80fbb639e90ae017d4ef2d39ceb69f59f2b.tar.bz2
drakx-e97da80fbb639e90ae017d4ef2d39ceb69f59f2b.tar.xz
drakx-e97da80fbb639e90ae017d4ef2d39ceb69f59f2b.zip
keyboard::load() causes some errors on kernel 2.4, ignoring them
Diffstat (limited to 'perl-install/keyboard.pm')
-rw-r--r--perl-install/keyboard.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index aa1ca9234..7a71e84e5 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -399,10 +399,10 @@ sub load {
my $table_index = $::i;
if (!$_) {
#- deallocate table
- ioctl($F, c::KDSKBENT(), pack("CCS", $table_index, 0, c::K_NOSUCHMAP())) or die "removing table $table_index failed: $!";
+ ioctl($F, c::KDSKBENT(), pack("CCS", $table_index, 0, c::K_NOSUCHMAP())) or log::l("removing table $table_index failed: $!");
} else {
each_index {
- ioctl($F, c::KDSKBENT(), pack("CCS", $table_index, $::i, $_)) or die "keymap ioctl failed ($table_index $::i $_): $!";
+ ioctl($F, c::KDSKBENT(), pack("CCS", $table_index, $::i, $_)) or log::l("keymap ioctl failed ($table_index $::i $_): $!");
} @{$tables[$i_tables++]};
}
} @$tables_given;