diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-08-06 11:55:10 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-08-06 11:55:10 +0000 |
| commit | 38c93685494c0ace5fce6ab92fb52176ed9cf872 (patch) | |
| tree | 87a089f2dadeb54532d6c6ffa11ad4517f6287df /perl-install/Xconfig/xfree4.pm | |
| parent | 769abbc0792c2e2daef05e22e4cfd6837eff9250 (diff) | |
| download | drakx-38c93685494c0ace5fce6ab92fb52176ed9cf872.tar drakx-38c93685494c0ace5fce6ab92fb52176ed9cf872.tar.gz drakx-38c93685494c0ace5fce6ab92fb52176ed9cf872.tar.bz2 drakx-38c93685494c0ace5fce6ab92fb52176ed9cf872.tar.xz drakx-38c93685494c0ace5fce6ab92fb52176ed9cf872.zip | |
make wacom config work
Diffstat (limited to 'perl-install/Xconfig/xfree4.pm')
| -rw-r--r-- | perl-install/Xconfig/xfree4.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/perl-install/Xconfig/xfree4.pm b/perl-install/Xconfig/xfree4.pm index 58c6cdad0..8ffa411e0 100644 --- a/perl-install/Xconfig/xfree4.pm +++ b/perl-install/Xconfig/xfree4.pm @@ -63,20 +63,21 @@ sub set_wacoms { @wacoms or return; - my %Modes = (Stylus => 'Absolute', Erasor => 'Absolute', Cursor => 'Relative'); + my %Modes = (Stylus => 'Absolute', Eraser => 'Absolute', Cursor => 'Relative'); each_index { - my ($wacom) = @_; + my $wacom = $_; foreach (keys %Modes) { - my $h = { Identifier => { val => $_ . ($::i + 1) }, + my $identifier = $_ . ($::i + 1); + my $h = { Identifier => { val => $identifier }, Driver => { val => 'wacom' }, - Style => { val => lc $_, Option => 1 }, + Type => { val => lc $_, Option => 1 }, Device => { val => $wacom->{Device}, Option => 1 }, Mode => { val => $Modes{$_}, Option => 1 }, if_($wacom->{USB}, USB => { Option => 1 }) }; $raw_X->add_Section('InputDevice', $h); - push @$layout, { val => qq("$_$::i" "AlwaysCore") }; + push @$layout, { val => qq("$identifier" "AlwaysCore") }; } } @wacoms; } |