From ca03fd38c046b250374502d004393bc278806731 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Fri, 1 Jul 2005 06:19:01 +0000
Subject: add is_bridge_interface

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

(limited to 'perl-install')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 68dc485c2..b84d940af 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -583,6 +583,11 @@ sub is_wireless_interface {
     c::isNetDeviceWirelessAware($interface) || -e "/sys/class/net/$interface/wireless";
 }
 
+sub is_bridge_interface {
+    my ($interface) = @_;
+    -f "/sys/class/net/$interface/bridge/bridge_id";
+}
+
 sub get_sysfs_device_id_map {
     my ($dev_path) = @_;
     my $is_usb = -f "$dev_path/bInterfaceNumber";
-- 
cgit v1.2.1