summaryrefslogtreecommitdiffstats
path: root/lib/Xconfig/xfree.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Xconfig/xfree.pm')
-rw-r--r--lib/Xconfig/xfree.pm9
1 files changed, 4 insertions, 5 deletions
diff --git a/lib/Xconfig/xfree.pm b/lib/Xconfig/xfree.pm
index a3dda06..8248fe9 100644
--- a/lib/Xconfig/xfree.pm
+++ b/lib/Xconfig/xfree.pm
@@ -275,21 +275,20 @@ sub set_wacoms {
$raw_X->remove_InputDevices('wacom');
my $layout = get_ServerLayout($raw_X)->{InputDevice} ||= [];
- @$layout = grep { $_->{val} !~ /^"(Stylus|Eraser|Cursor)/ } @$layout;
+ @$layout = grep { $_->{val} !~ /^"(Stylus|Eraser|Cursor|Pad)/ } @$layout;
@wacoms or return;
- my %Modes = (Stylus => 'Absolute', Eraser => 'Absolute', Cursor => 'Relative');
-
+ my @Modes = ('Stylus', 'Eraser', 'Cursor', 'Pad');
+
each_index {
my $wacom = $_;
- foreach (keys %Modes) {
+ foreach (@Modes) {
my $identifier = $_ . ($::i + 1);
my $h = { Identifier => { val => $identifier },
Driver => { val => 'wacom' },
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);