From f25f3075bd580a8065d1ec2827c3968fb3066efd Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Mon, 18 Apr 2005 19:35:16 +0000
Subject: add getSynapticsTouchpads()

---
 perl-install/detect_devices.pm | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'perl-install')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index f2c05bf4f..f1622fcad 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -470,6 +470,12 @@ sub getInputDevices() {
     @devices;
 }
 
+sub getSynapticsTouchpads() { 
+    grep {
+        member($_->{description}, "|SynPS/2 Synaptics TouchPad", "|AlpsPS/2 ALPS TouchPad")
+    } getInputDevices();
+}
+
 sub getSerialModem {
     my ($modules_conf, $o_mouse) = @_;
     my $mouse = $o_mouse || {};
-- 
cgit v1.2.1