diff options
| author | caramel | 2007-07-17 08:44:24 +0000 |
|---|---|---|
| committer | caramel | 2007-07-17 08:44:24 +0000 |
| commit | b2cf53d79b8d761a16d3b8f2afe4a54de72ee819 (patch) | |
| tree | 23ae4a9f2887d858b05c7aa736000d773f79a1d4 /src/MTools | |
| parent | 3dd0489747f0dddbadfbc19654da72b80a7315e8 (diff) | |
| download | mtc-b2cf53d79b8d761a16d3b8f2afe4a54de72ee819.zip mtc-b2cf53d79b8d761a16d3b8f2afe4a54de72ee819.tar.gz mtc-b2cf53d79b8d761a16d3b8f2afe4a54de72ee819.tar.bz2 mtc-b2cf53d79b8d761a16d3b8f2afe4a54de72ee819.tar.xz | |
Modification du WacomAdapter pour correspondance avec les messages Ivy generes
Diffstat (limited to 'src/MTools')
| -rw-r--r-- | src/MTools/Adapters/WacomAdapter.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/MTools/Adapters/WacomAdapter.pm b/src/MTools/Adapters/WacomAdapter.pm index 5d6c77a..1ac654c 100644 --- a/src/MTools/Adapters/WacomAdapter.pm +++ b/src/MTools/Adapters/WacomAdapter.pm @@ -39,11 +39,10 @@ sub new { bless $self, $class; $self -> {__pointer_status} = 0; $self -> {__ivy} = new MTools::MIvy ($adresse, $ivy_name); - $self -> {__ivy} -> binding ('pad_event wacom_id='.$wacom_adresse.' button=(.*) status=(.*) time=(.*)', [\&wacom_event, $self, 'buttons']); - $self -> {__ivy} -> binding ('slider_event wacom_id='.$wacom_adresse.' value=(.*) side=(.*) time=(.*)', [\&wacom_event, $self, 'sliders']); - $self -> {__ivy} -> binding ('pointer_event wacom_id='.$wacom_adresse.' x=(.*) y=(.*) presure=(.*) tilt_x=(.*) tilt_y=(.*) wheel=(.*) predicted_x=(.*) predicted_y=(.*) type=(.*) serial_number=(.*) time=(.*)', [\&wacom_event, $self, 'pointers']); + $self -> {__ivy} -> binding ('pad_event device_id='.$wacom_adresse.' button=(.*) status=(.*) time=(.*)', [\&wacom_event, $self, 'buttons']); + $self -> {__ivy} -> binding ('slider_event device_id='.$wacom_adresse.' value=(.*) side=(.*) time=(.*)', [\&wacom_event, $self, 'sliders']); + $self -> {__ivy} -> binding ('pointer_event device_id='.$wacom_adresse.' x=(.*) y=(.*) presure=(.*) tilt_x=(.*) tilt_y=(.*) wheel=(.*) predicted_x=(.*) predicted_y=(.*) type=(.*) serial_number=(.*) time=(.*)', [\&wacom_event, $self, 'pointers']); return $self; - } sub binding { |