Bonding driver changed in linux 3.13

It would appear the patch by BlauwBlaatje on April 29, 2014 has been truncated so is missing the final part of the patch. The following works for me:

— check_linux_bonding.a 2014-10-13 11:13:17.899342000 +0100
+++ check_linux_bonding.b 2014-10-13 11:33:03.010804900 +0100
@@ -255,7 +255,14 @@
my $masters_file = “$sysdir/bonding_masters”;
my @bonds = ();
my %bonding = ();
–
+ my $device;
+ my ($kernver, @rest) = split(‘-‘, `uname -r`);
+ if ( $kernver >= 3.13 ) {
+ $device = “lower”;
+ } else {
+ $device = “slave”;
+ }
+
if (! -f $masters_file) {
return {};
}
@@ -311,8 +318,8 @@

# get slave status
foreach my $slave (@slaves) {
– open my $STATE, ‘